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PREFACE 


The  Service,  Inventory  and  Maintenance  System  (SIMS)  is  a 
computerized  information  system  designed  to  assist  urban  transit 
systems  in  the  management  of  their  bus  service,  maintenance  and 
inventory  activities.  The  SIMS  system  was  developed  by  the 
MITRE  Corporation  under  the  sponsorship  of  the  Office  of  Transit 
Management,  Urban  Mass  Transportation  Administration. 

SIMS  comprises  three  interrelated  program  modules. 

The  Service/Unit -Change  module  is  designed  to  assist  transit 
management  in  the  scheduling  and  control  of  the  vehicle  servicing 
and  maintenance  operations.  Labor  and  cost  reports  on  the  bus 
maintenance  activity  are  produced  by  the  Repair-Cost  module.  The 
Inventory  module  provides  management  and  financial  control  reports 
on  all  transit  inventory  activity  such  as  parts  issues,  purchase 
orders  and  receipts. 
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1.0  INTRODUCTION 


Under  the  sponsorship  of  the  Urban  Mass  Transportation  Adminis- 
tration (UMTA) , an  automated  system  to  record,  analyze,  and  report  on 
the  maintenance  activities  of  bus  systems  in  the  urban  transit  industry 
is  being  developed.  This  information  system  is  the  Service,  Inventory, 
and  Maintenance  System  (SIMS) . 

The  SIMS  Repair  Cost  System  is  one  component  of  SIMS.  It  is 
designed  to  provide  management  with  detailed  monthly  reports  on  main- 
tenance activities.  The  description  of  the  system  includes  details 
of  the  reports,  inputs,  files,  procedures,  and  the  computer  program 
functions.  Each  computer  program  is  described  in  detail.  A source 
listing  of  each  program  is  provided  in  Supplement  I to  this  document. 

To  facilitate  the  implementation  of  the  SIMS  Repair  Cost  System 
on  various  object  computers,  the  software  has  been  written  in  ANSI  COBOL. 
The  programs  were  tested,  using  an  IBM  360/50  computer. 

The  system  is  in  use  at  Alameda-Contra  Costa  Transit  District 
(ACTD)  and  Dallas  Transit  System  (DTS)  under  demonstration  sponsored 
by  UMTA.  The  system  is  operated  on  a service  bureau  basis  in  the 
localities  of  the  demonstration  projects.  The  object  computer  for 
ACTD  is  an  IBM  360/65  and  for  DTS,  an  IBM  370/145.  These  computers, 
and  the  360/50  used  for  testing  operate  under  OS,  version  21.6. 
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2.0  OVERALL  DESCRIPTION  OF  SIMS  REPAIR  COST  SYSTEM 


The  SIMS  Repair  Cost  System  consists  of  programs,  files  and 
procedures  to  accept  and  store  maintenance  labor  transactions  and  to 
produce  monthly  reports  on  maintenance  operations.  Through  the  reporting 
on  past  activities,  management  is  provided  with  information  that  will 
support  the  control  and  scheduling  of  future  operations. 

Maintenance  labor  transactions  are  entered  and  edited;  valid  records 
are  stored  in  the  Labor  Transaction  History  File,  CN1510.RPC.M.TRANHIST(  ). 
( ) indicates  that  the  file  is  a generation  data  set. 

The  Repair  Cost  System  is  dependent  on  the  other  two  modules  of 
SIMS  for  report  generation.  The  system  is  designed  to  utilize  master 
files,  maintained  by  these  modules,  as  well  as  the  labor  history  file. 

The  Inventory  Transaction  History  File,  CN1744. INV.M. TRANTAPE ( ), 
maintained  by  the  SIMS  Inventory  System,  provides  parts  cost  data. 

The  Vehicle  Master  File,  CN1510. SRV.M. VEHICLE ( ),  maintained  by  the  SIMS 
Service/Unit  Change  System,  provides  vehicle  mileage  data. 

Figure  2.0-1  is  a flowchart  of  the  Repair  Cost  System.  The  pro- 
gram libraries  and  two  report  control  files  are  contained  in  a private 
disk  pack,  TMDISK.  This  disk  pack  also  contains  major  system  files 
and  program  libraries  for  the  Service/Unit  Change  System. 

The  major  input  consists  of  the  maintenance  labor  records,  iden- 
tifying work  performed.  These  records  may  be  in  the  form  of  cards  or 
on  magnetic  tape.  The  latter  form  is  illustrated  in  the  flowchart. 

If  the  labor  records  do  not  contain  employee  hourly  pay  rates,  then  an 
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employee  master  file,  EMPLCD,  containing  records  of  hourly  rates,  is 
also  input  to  the  program  that  maintains  the  transaction  history  file. 

The  Labor  Transaction  History  File,  together  with  the  Inventory 
Transaction  History  File  and  the  Vehicle  Master  File  provide  input  to 
the  report  generator  programs.  Records  are  extracted  from  the  three 
files,  in  accord  with  the  report  requests  specified  in  the  Date  Card 
File,  DATECD,  and  placed  in  temporary  storage  for  report  generation. 
Report  programs  are  normally  executed  monthly.  A computer  run  for 
report  preparation  may  be  made  at  any  time  independent  of  or  in  con- 
junction with  file  maintenance. 

The  reports  generated  are  of  two  types.  The  first  type,  edit 
reports,  is  produced  automatically  by  the  system.  Edit  reports  are 
designed  to  display  transactions  rejected  by  the  system  because  of  data 
error.  These  reports  are  used  as  source  documents  for  the  preparation 
of  corrected  transactions.  The  second  type  is  on-demand  reports.  These 
consist  of  two  sets  of  reports  for  which  the  user  must  make  a request. 
These  sets  of  on-demand  reports  are: 

(a)  Bus  Repair  Cost  reports  which  provide  the  user  with  detailed 
revenue  vehicle  repair  cost  information.  One  type  of  report 
within  this  set  displays  subassembly  repair  costs  for  each 
bus.  The  other  type  summarizes  subassembly  repair  costs  by 
operating  division.  The  content  and  number  of  each  type  of 
report  is  controlled  by  the  user.  User  options  as  to  con- 
tent are  in  two  dimensions — the  nature  of  the  costs  displayed 
and  the  reporting  period.  The  latter  can  be  for  any  number 
of  months  up  to  six  months.  Content  options  are: 


(1) 

labor 

and  parts  costs, 

(2) 

labor 

cost  only,  and 

(3) 

parts 

cost  only. 
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The  user  can  also  elect  to  exercise  one,  two,  or  all  three 
content  options  in  the  same  report  request. 

(b)  Maintenance  Labor  reports,  which  display  the  use  and  cost 
of  hourly  maintenance  labor  by  work  categories,  for  each 
division  and  for  the  property  as  a whole. 

Currently,  the  SIMS  Repair  Cost  System  is  in  use  at  ACTD  and 
DTS.  In  both  applications,  the  system  has  been  installed  at  an  in- 
dependent computer  center.  For  ACTD,  the  system  has  been  installed 
at  a commercial  service  bureau  on  an  IBM  360/65.  For  DTS,  the  system 
has  been  installed  at  the  municipal  computer  center  on  an  IBM  370/145. 
The  transit  property  supplies  the  maintenance  labor  records.  These 
records  are  also  used  to  produce  the  property's  maintenance  cost  dis- 
tribution reports  under  its  existing  system.  At  DTS,  the  records  are 
also  used  to  prepare  the  bi-weekly  non-operator  payroll. 

The  labor  and  materials  records,  that  are  the  data  sources  for 
the  report  programs,  contain  transaction  identification  data  that  is 
specific  to  each  property.  To  accommodate  the  property-specific  data 
in  these  records,  there  are  two  versions  of  all  but  one  of  the  pro- 
grams in  the  system.  Modification  of  these  programs  is  required  be- 
fore the  system  is  installed  at  a transit  property. 

System  execution  is  controlled  by  JCL  cards,  which  invoke  cat- 
aloged procedures  stored  in  the  computer  center's  system  library,  and 
by  report  request  cards.  ACTD  supplies  the  control  cards  to  the  com- 
puter center;  the  municipal  computer  center  prepares  the  job  deck  for 
DTS.  The  procedures  used  are  specific  to  the  transit  property  and  to 
the  computer  center,  although  there  are  similiarities  in  their  content. 
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3.0  REPAIR  COST  SYSTEM  OUTPUTS 


Output  of  the  SIMS  Repair  Cost  System  consists  of  reports  and 
error  messages.  The  reports  produced  are  listed  in  Table  3.0-1.  They 
can  be  categorized  as: 

(a)  User  Reports.  There  are  five  user  reports  that  can  be 
generated  by  the  Repair  Cost  System.  These  reports  are 
described  in  Section  3.1.  They  are  on-demand  reports, 
normally  requested  monthly.  The  reports  are  designed  to 
provide  maintenance  management  with  information  necessary 
for  effective  maintenance  operation  and  control. 

(b)  Edit  Reports:  There  are  five  edit  reports,  generated  auto- 

matically by  the  system.  These  reports  are  described  in 
Section  3.2.  They  are  designed  to  ensure  that  the  correct 
information  is  being  entered  in  the  system. 

The  error  messages  that  can  be  generated  during  system  execution 
are  described  in  Section  3.3.  These  messages  are  designed  to  indicate 
to  system  operators  the  cause  of  system  malfunctions. 
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REPAIR  COST  SYSTEM  REPORTS 
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3 . 1 User  Reports 


The  five  user  reports  are  produced  through  the  execution  of  two 
programs.  The  reports  produced  by  each  program  are  described  together 
in  one  of  the  two  following  subsections.  Each  report  is  described 
in  terms  of  the  report's  usefulness,  a report  specification,  and  a 
sample  report. 

3.1.1  Bus  Repair  Cost  Reports 

The  Bus  Repair  Cost  reports  are  on-demand  reports,  normally  re- 
quested monthly.  They  are  designed  to  provide  maintenance  management 
with  detailed  revenue  vehicle  repair  cost  information.  Comparison  of 
the  reports  over  a period  of  time  (for  example,  three  to  six  months) 
will  assist  management  in  the  assignment  of  buses  to  routes,  vehicle 
retirement  decisions,  and  other  related  policy  decisions.  'Summary 
costs  by  division  are  also  reported.  This  permits  comparison  among 
divisions  and  with  system  totals. 

Two  types  of  report  are  produced  through  the  execution  of  the 
Bus  Repair  Cost  Report  Generator  program  (RP080).  The  content  and 
number  of  each  type  of  report  is  controlled  by  the  user.  User  options 
as  to  content  are  in  two  dimensions — the  nature  of  the  costs  dis- 
played and  the  reporting  period.  The  latter  is  specified  by  the  user 
in  the  report  request  record  and  can  be  for  any  number  of  months  up 
to  six  months.  Content  options  are: 

(a)  labor  and  parts  costs  - RPCR45, 

(b)  labor  cost  only  - RPCR50,  and 

(c)  parts  cost  only  - RPCR55. 
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These  options  are  exercised  through  JCL;  the  user  selects  the 
cataloged  procedure  (referenced  above)  to  be  executed.  The  user  can 
elect  to  exercise  one,  two,  or  all  three  content  options  in  the  same 
report  request  by  invoking  the  appropriate  procedures. 

The  two  types  of  report  are: 

(a)  Bus  Repair  Cost  by  Subassembly:  An  example  of  this  type  of 

report  is  provided  in  Figure  3.1-1.  Specifications  of  the 
report  are  described  in  Table  3.1-1.  It  lists  vehicle  repair 
costs  for  each  revenue  vehicle  in  the  system.  These  costs 
are  displayed  in  terms  of  vehicle  groups  (subassembly)  and 

of  the  total  for  these  groups.  This  vehicle  total  is  also 
shown  in  terms  of  cents  per  mile.  Costs  attributable  to 
accidents  and  vandalism  are  excluded  from  the  subassembly 
costs  and  displayed  separately. 

(b)  Subassembly  Repair  Cost  - Division  Summary:  An  example  of 

this  type  of  report  is  provided  in  Figure  3.1-2.  Specifi- 
cations of  the  report  are  described  in  Table  3.1-2.  It 
displays  total  repair  cost  for  each  division  and  the  system 
by  vehicle  group  (subassembly)  and  in  total.  Costs  attri- 
butable to  accident  and  vandalism  repairs  are  excluded  from 
subassembly  and  total  costs  and  displayed  separately. 

3.1.2  Maintenance  Labor  Reports 

The  maintenance  labor  reports  are  on-demand  reports,  normally 
requested  monthly.  They  are  designed  for  use  by  management  to  monitor 
and  plan  for  labor  utilization.  The  reports  display  details  of  the  use 
and  cost  of  hourly  maintenance  labor  by  division  and  for  the  property, 
in  total  and  in  four  major  categories: 

(a)  revenue  vehicles, 

(b)  Maintenance  Department, 

(c)  other  departments,  and 

(d)  fringe. 
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FIGURE  3.1-1 
BUS  REPAIR  COST 
BY  SUBASSEMBLY  REPORT 


TABLE  3.1-1 


REPORT  SPECIFICATION 


GENERATING  PROGRAM:  RPOSO  FREQUENCY : Monthly 

REPORT  HEADER:  Bus  Repair  Cost  By  Subassembly 

For  period  MM/DD/YY  thru  MM/DD/YY  in  Dollars 

ORGANIZATION : The  report  contains  a separate  section  for  each 

division  of  the  property.  Within  each  section, 
information  is  displayed  for  individual  buses, 
in  ascending  bus  number  order. 

CONTENTS : 


COLUMN  HEADER  DESCRIPTION 


BUS 

Vehicle  number 

INS?. 

00 

Cost  of  inspection  work 

AXLE 

- FRONT 

01 

Cost  of  repair  work,  including  unit 
rebuild,  for  vehicle  subassemblies 

Front  axle 

- REAR 

02 

Rear  axle 

BRAKES 

04 

Brake  system,  including  drum 

CLUTCH 

05 

Clutch 

COOL 

06 

Cooling  system 

ELEC 

07 

Electrical  system 

ENG 

08 

Engine 

TRANS 

17 

Transmission 

WHEELS 

19 

Wheels 

BODY 

2b 

Body 

A/C 

26 

Air  conditioning  system 

MI  SC. 

Cost  of  miscellaneous  work,  not  else- 

TOTAL 

where  classified 

Total  cost  of  inspection  and  repair 

CENTS  PER 

MILE 

work 

Total  cost  divided  by  miles  traveled 

ACCI"T 

by  bus  during  report  period 
Cost  of  repair  work  resulting  from 

VANDAL 

accidents 

Cost  of  repair  work  resulting  from 

vandalism 
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AC  TRANSIT 

SUBASSEMBLY  REPAIR  COST  — DIVISION  SUMMARY 

FOR  PERIOD  02/01/73  THRU  02/28/73  IN  DOLLARS 
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FIGURE  3.1  2 

SUBASSEMBLY  REPAIR  COST 
DIVISION  SUMMARY  REPORT 


TABLE  3.1-2 


REPORT  SPECIFICATION 


GENERATING  PROGRAM:  RP080  FREQUENCY:  Monthly 

REPORT  HEADER:  SUBASSEMBLY  REPAIR  COST-DIVISION  SUMMARY 

FOR  PERIOD  MM/DD/YY  THRU  MM/DD/YY  IN  DOLLARS 

ORGANIZATION:  Information  displayed  is  organized  hy  subassembly 

(group)  code  in  ascending  order.  A total  line  and 
separate  lines  for  accident  cost  and  vandalism  cost 
are  included. 

CONTENTS 


COLUMN  HEADER 


DESCRIPTION 


DIV  02 
No  header 


MILE 


DIV  03 
No  header 
MILE 
DIV  Ok 
No  header 
MILE 

ALL  DIVISIONS 
No  header 
MILE 


Operating  division  identification 
(see  note) 

Cost  of  repair  work  performed  on 
revenue  vehicles  assigned  to  the 
division. 

Cost  divided  by  miles  traveled  by 
all  vehicles  assigned  to  the 
division  in  the  report  period. 

As  for  Division  02 


As  for  Division  02 


Identifies  columns  containing 
system  totals 

Total  repair  cost  for  all  revenue 
vehicles  in  the  system 
Cost  divided  by  miles  traveled  by 
all  revenue  vehicles  in  the 
system  in  the  report  period. 


Note:  Identification  of  the  divisions  is  specific  to  the  user. 
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Work  performed  directly  on  revenue  vehicles  is  reported  in  the 
first  category.  General  bus  repair,  scheduled  inspections,  rebuilding 
of  replaceable  component?  (units),  and  servicing  and  cleaning  are  re- 
ported separately.  A subtotal  of  these  types  of  work  represents  the 
mainstream  of  Maintenance  Department  work.  Repairs  due  to  accidents 
and  vandalism  are  also  reported  separately  and  included  in  the  revenue 
vehicle  total. 

The  second  category.  Maintenance  Department,  includes  work  per- 
formed in  maintaining  the  shops  and  equipment.  Other  Departments 
represents  labor  utilized  in  support  of  other  organizations  within 
the  property.  The  fourth  category,  fringe,  accounts  for  non-work  time — 
that  is,  vacations,  holidays,  sick  time,  and  other  hours — paid  for  under 
the  employee  fringe  benefit  program. 

All  hourly  maintenance  labor  is  accounted  for  among  the  four 
major  categories  of  work.  Overtime,  which  is  included  in  the  totals, 
is  displayed  as  a separate  line  item;  this  displays  to  management 
premium  lost  time  incurred. 

The  reports  are  generated  through  the  execution  of  the  Main- 
tenance Report  Generator  program,  M1M200.  The  reports  produced  are: 

(a)  Hourly  Maintenance  Labor  Utilization:  An  example  of  the 

report  is  provided  in  Figure  3.1-3.  Specifications  of  the 
report  are  described  in  Table  3 .1-3.  It  displays  the  labor 
utilization  information,  described  above,  in  terms  of  hours. 
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FIGURE  3.1  3 

HOURLY  MAINTENANCE  LABOR 
UTILIZATION  REPORT 


TABLE  3.1-3 


REPORT  SPECIFICATION 


GENERATING  PROGRAM:  M1M200  FREQUENCY:  Monthly 

REPORT  HEADER:  HOURLY  MAINTENANCE  LABOR  UTILIZATION 

ORGANIZATION : Information  displayed  is  organized  by  major  categories, 

and  within  each  major  category  by  sub-categories . of 
work  performed.  Appropriate  subtotals  and  an  overall 
total  are  included.  See  Figure  3.1-3  for  titles  of 
work  categories. 

CONTENTS 


COLUMN  HEADER 


DESCRIPTION 


DIV02  Division  identification.  This 

DIV03  identification  is  specific  to  the 

DIVOU  user. 

SHOP  Central  maintenance  facility 

TOTAL 


Under  each  column  header,  the  number  of  maintenance  labor  hours  charged 
to  each  work  category  by  personnel  of  the  organizational  unit  identified 
is  shown. 
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(b)  Maintenance  Labor  Costs:  An  example  of  the  report  is  provided 

in  Figure  3.1-*+.  Specifications  of  the  report  are  described 
in  Table  3.1-*+.  It  is  essentially  identical  with  the  Hourly 
Maintenance  Labor  Utilization  report.  However,  actual  pay- 
roll costs  are  displayed  instead  of  hours.  Thus,  the  report 
provides  a cost  interpretation  of  the  use  of  labor  resources. 
Also,  department  totals  are  expressed  in  terms  of  cents  per 
hour . 
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FIGURE  3.1-4 
MAINTENANCE  LABOR 
COST  REPORT 


TABLE  3.1-U 


REPORT  SPECIFICATION 


GENERATING  PROGRAM:  M1M200  FREQUENCY : Monthly 

REPORT  HEADER:  MAINTENANCE  LABOR  COSTS 

ORGANIZATION : Information  displayed  is  organized  in  the  same  manner 

as  on  the  Hourly  Maintenance  Labor  Utilization  report 
(see  Table  3.1-3). 

CONTENTS 


COLUMN  HEADER  DESCRIPTION 


Column  headings  are  as  specified  for  the  Hourly  Maintenance  Labor 
Report . 

Under  each  column  header,  the  dollar  cost  of  maintenance  labor  hours 
charged  to  each  work  category  by  personnel  of  the  organizational  unit 
identified  is  shown. 


3.2  Edit  Reports 


Edit  reports  are  reports  produced  by  the  system  to  enable  the  user 
to  monitor  system  input  and  to  correct  input  errors.  These  reports  are 
generated  automatically  by  the  system.  A description  of  each  edit 
report  is  provided  in  the  following  subsections. 

3.2.1  Data  Acceptance  Edit  List 

The  maintenance  labor  distribution  records  entered  in  the  Repair 
Cost  System  must  meet  specified  data  acceptance  criteria  before  further 
processing  is  performed.  These  criteria  are  in  the  form  of  edit 
criteria  (that  is,  checking  field  contents).  The  criteria  are  specified 
in  detail  in  the  description  of  the  Data  Acceptance  program,  DA500,  in 
Sections  7-1  and  J.2.  Transactions  that  fail  to  meet  these  criteria 
are  rejected  and  printed  on  the  Data  Acceptance  Edit  List. 

An  example  of  the  edit  list  is  provided  in  Figure  3.2-1.  Specifi- 
cations for  the  report  are  described  in  Table  3.2-1. 

3.2.2  Labor  Transaction  Edit  List 

The  maintenance  labor  distribution  records  sucessfully  processed 
by  the  Data  Acceptance  program  are  tested  again  against  edit  criteria 
in  the  Labor  Transaction  History  File  Edit/Update  program,  DG500. 

These  edit  criteria  are  specified  in  detail  in  the  description  of  this 
program  in  Section  7-3.  Field  contents  are  checked  against  values 
specified  in  the  program.  In  particular,  the  account  number  in  the 
input  record  is  checked  to  determine  if  the  input  value  is  valid.  Trans- 
actions that  fail  to  meet  the  edit  criteria  are  rejected  and  printed 
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FIGURE  3.2  1 

DATA  ACCEPTANCE  EDIT  LIST 


TABLE  3.2-1 


REPORT  SPECIFICATION 


GENERATING  PROGRAM:  DA500 


FREQUENCY : Each  time  the  Labor 

Transaction  History  File 
is  updated 


REPORT  HEADER:  DATA  ACCEPTANCE  EDIT  LIST 

FOR  PROCESSING  DATE  MM/DD/YY 


ORGANIZATION : Report  lines  are  printed  in  the  order  that  the  trans- 

actions are  entered. 


CONTENTS 


COLUMN  HEADER 


DESCRIPTION 


Two  lines  are  printed  for  each  transaction  rejected.  The  first  line 
contains  a listing  of  the  transaction.  The  second  line  contains  an 
asterisk  under  the  low  order  byte  of  each  field  in  error. 


3-17 


' on  the  Labor  Transaction  Edit  List. 


An  example  of  the  edit  list  is  provided  in  Figure  3.2-2.  Specifi- 
cations for  the  report  are  described  in  Table  3.2-2. 

3.2.3  List  of  Accounting  Classification  Exceptions 

As  a preliminary  to  the  generation  of  the  maintenance  labor  reports, 
maintenance  labor  distribution  records  are  classified  for  reporting 
purposes.  During  execution  of  the  Maintenance  Report  Extract  program, 
input  record  values  that  identify  the  nature  of  the  transaction  are 
compared  to  valid  combinations  of  identifying  parameters  contained  in 
a classification  table.  If  the  input  values  cannot  be  matched  with  a 
valid  combination  in  the  table,  the  transaction  is  rejected  and  is 
printed  on  the  List  of  Accounting  Classification  Exceptions. 

An  example  of  the  edit  list  is  provided  in  Figure  3.2-3.  Specifi- 
cations for  the  report  are  described  in  Table  3.2-3- 

3.2.4  Employee  Card  Edit  List 

The  processing  of  maintenance  labor  distribution  records  may 
require  the  use  of  an  employee  master  file.  At  DTS,  this  is  a require- 
ment. Employee  records,  on  cards,  are  input  to  the  DTS  Employee  File 
Extract  program,  EMP100,  and  a disk  file,  containing  the  employee  num- 
ber organization  code  and  hourly  pay  rate  for  each  maintenance  employee, 
is  created.  During  execution  of  the  program,  the  input  records  are 
tested  against  certain  edit  criteria.  These  are  described  in  detail  in 
Section  7-10.  Input  records  that  fail  to  meet  the  edit  criteria  are 
rejected  and  printed  on  the  Employee  Card  Edit  List. 
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FIGURE  3.2-2 

LABOR  TRANSACTION  EDIT  LIST 


TABLE  3.2-2 


REPORT  SPECIFICATION 


GENERATING  PROGRAM:  DG500  FREQUENCY : Each  time  the  Labor 

Transaction  History 
File  is  updated 

REPORT  HEADER:  LABOR  TRANSACTION  EDIT  LIST 

FOR  PROCESSING  DATE  MM/DD/YY 

ORGANIZATION:  Report  lines  are  printed  in  the  order  that  the  trans- 

actions are  processed. 

CONTENTS 


COLUMN  HEADER 


DESCRIPTION 


Two  lines  are  printed  for  each  transaction  rejected.  The  first  line 
contains  a listing  of  the  transaction.  The  second  line  contains  an 
asterisk  under  the  low  order  byte  of  each  field  in  error. 
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FIGURE  3.2-3 

LIST  OF  ACCOUNTING  CLASSIFICATION  EXCEPTIONS 


TABLE  3.2-3 


REPORT  SPECIFICATION 

GENERATING  PROGRAM:  CLASSM  FREQUENCY : Monthly 

REPORT  HEADER:  LIST  OF  ACCOUNTING  CLASSIFICATION  TRANSACTIONS 

ORGANIZATION : Report  lines  are  printed  in  the  order  that  the  trans- 

actions are  processed 

CONTENTS 

COLUMN  HEADER  DESCRIPTION 

One  line  is  printed  for  each  transaction  rejected.  This  line  contains 
a listing  of  the  transaction. 
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An  example  of  the  edit  list  is  provided  in  Figure  3.2-4.  Specifi- 
cations for  the  report  are  described  in  Table  3.2-4. 

The  DTS  Employee  File  Extract  program  also  generates  another 
report.  Employee  Statistics.  This  report  summarizes  the  results  of 
processing  the  employee  records.  It  displays,  by  organizational  unit, 
the  number  of  valid  records  and  the  number  of  records  rejected.  This 
enables  the  user  to  ascertain  quickly  whether  all  employee  records 
required  for  the  processing  of  maintenance  labor  transactions  were 
accepted.  If  all  required  employee  records  have  been  accepted,  the 
edit  list  contains  only  records  of  non-maintenance  employees.  Other- 
wise, the  user  can  ascertain  from  the  edit  list  which  employee  records 
were  rejected  and  corrective  action  can  be  taken. 

An  example  of  the  Employee  Statistics  report  is  provided  in  Figure 
3.2-5.  Specifications  for  the  report  are  described  in  Table  3.2-5. 
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FIGURE  3.24 

employee  card  edit  list 


TABLE  3.2-U 


REPORT  SPECIFICATION 


GENERATING  PROGRAM:  EMPIOO  FREQUENCY ; Each  time  the  Labor 

Transaction  History- 
File  is  updated 

REPORT  HEADER:  EMPLOYEE  CABD  EDIT  LIST 

FOR  PROCESSING  DATE  MM/DD/YY 

ORGANIZATION : Report  lines  are  printed  in  the  order  that  the  input 

records  are  processed. 

CONTENTS 


COLUMN  HEADER  DESCRIPTION 

Two  lines  are  printed  for  each  input  record  rejected.  The  first 
contains  a listing  of  the  record.  The  second  line  contains  an  asterisk 
under  the  low  order  byte  of  each  field  in  error. 
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TABLE  3.2-5 


REPORT  SPECIFICATION 

GENERATING  PROGRAM:  EMPIOO  FREQUENCY : Each  time  the  Labor 


Transaction  History 
File  is  updated 

REPORT  HEADER:  EMPLOYEE 

STATISTICS 

ORGANIZATION : The  number  of  employee  records  processed  is  displayed 

by  organizational  unit  and  in  total.  The  organizational 
units  are  identified  by  codes  that  are  specific  to  the 


user. 

CONTENTS 

COLUMN  HEADER 

DESCRIPTION 

VALID 

The  number  of  valid  maintenance 
employee  records  for  each  organiza- 
tional unit. 

REJECTED 

The  number  of  employee  records  rejected 
Records  of  maintenance  employees 
rejected  are  invalid  records.  All 
records  of  non-maintenance  employees 
are  rejected. 
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?. 3 Error  Messages 


In  addition  to  the  edit  lists  generated  automatically  by  the 
data  acceptance  and  edit/update  programs  (see  Section  3.2),  there 
are  error  messages  designed  to  inform  the  user  of  problems  during 
system  operation.  Upon  printing  of  an  error  message,  program  ex- 
ecution is  terminated.  Some  errors  are  serious  enough  to  result  in 
either  the  bypassing  of  the  remainder  of  the  job  step  or  cancellation 
of  the  entire  job. 

The  Repair  Cost  System  error  messages  and  the  programs  with 
which  they  are  associated  are  listed  in  Table  3.3-1.  Also  given 
is  the  effect  that  the  error  has  on  the  system — i.e.,  program 
termination  only  or  system  termination.  The  messages  are  listed 
according  to  error  type.  See  Section  7.0  for  the  exact  message 
wording  in  each  program,  and  a description  of  the  cause  of  the  error. 
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4.0  REPAIR  COST  SYSTEM  INPUT 

The  input  to  the  SIMS  Repair  Cost  System  consists  of: 

(a)  maintenance  labor  transaction  records.  These  records 
are  described  in  Section  4.1. 

(b)  records  contained  in  files  maintained  by  other  modules  of 
SIMS.  These  records  are  described  in  Section  4.2. 

(c)  date  cards  and  JCL  cards.  These  inputs  control  the 
execution  of  the  programs;  they  are  briefly  described 
in  Section  4.3. 
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4.1  Maintenance  Labor  Transactions 


Maintenance  labor  transactions  are  input  to  the  SIMS  Repair  Cost 
System  in  the  form  of  80-character  card  images.  ACTD  input  is  in  the 
form  of  1600  bpi  blocked  magnetic  tape,  containing  25  records  per  block. 
DTS  input  is  in  the  form  of  a card  deck.  The  existing  labor  distri- 
bution records,  used  for  payroll  and  accounting  purposes,  are  the  in- 
put to  the  Repair  Cost  System.  The  format  of  the  labor  record  varies 
as  between  the  two  properties.  The  ACTD  format  has  been  adopted  as 
the  basic  format  for  the  system.  DTS  records  are  reformatted  during 
the  execution  of  the  Data  Acceptance  program,  DA500D. 

Irrespective  of  format,  the  labor  distribution  record  identifies 
the  nature  of  a job  performed  and  the  hours  charged  to  that  job  by  a 
maintenance  employee.  For  repair  jobs  on  revenue  vehicles,  the  data 
elements  include,  as  appropriate,  codes  that  identify  the  group  (sub- 
assembly)  and  unit  (component)  on  which  the  work  was  performed,  and  the 
type  and  source  of  work  performed.  The  specific  formats  of  the  labor 
distribution  record  at  ACTD  and  DTS  are  described  in  the  following 
subsections . 

4.1.1  ACTD  Labor  Records 

The  ACTD  format  of  the  labor  distribution  record  contains  the 
data  elements  that  identify  the  nature  of  a maintenance  job  and  the 
number  of  hours  charged  to  that  job  by  a maintenance  employee.  The 
format  also  includes  an  organization  code,  which  identifies  where  the 
employee  works,  and  the  employee's  hourly  pay  rate. 
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Figure  4.1-1  describes  the  format  of  the  ACTD  Labor  Distribution 


Record.  This  record  consists  of  the  following  data  items: 


Character 

COBOL 

Position 

Data  Item 

Field  Name 

1-2 

Day  of  month  of  transaction 

CR-TR-DAY-MO 

3 

Transaction  modifier  code 

CR-TR-NEG-CODE 

4-9 

Filler 

FILLER 

10 

Time  card  indicator 

CR-TR-TIME-CARD 

11-30 

Filler 

FILLER 

31 

Shift  code 

CR-TR-SHIFT 

32-35 

Regular  hours  worked 

CR-TR-REG-HOURS 

36-39 

Premium  hours  worked 

CR-TR-PREM-HOURS 

40-41 

Group  code 

CR-TR-VEH-CODE 

42-43 

Unit  code 

CR-TR-UNIT-CODE 

44-45 

Organization  code 

CR-TR-ORG-CODE 

46-47 

Filler 

FILLER 

48 

Work  type  code 

CR-TR-W0RK-TYPE 

49 

Reason  code 

CR-TR-REASON-CODE 

50-53 

Employee  number 

CR-TR-EMP-NBR 

54-57 

Hourly  pay  rate 

CR-TR-PAY-RATE 

58 

Work  order  indicator 

CR-TR-WO-CONTRL 

59-62 

Work  order  number 

CR-TR-WO-NBR 

63-66 

Account  number 

CR-TR-ACCT-NBR 

67-68 

Sub-account  number 

CR-TR-SUB-ACCT 

69 

User  division  code 

CR-TR-USER-DIV 

70-73 

Vehicle  number 

CR-TR-VEH-NBR 

74 

Fleet  code 

CR-TR-FLEET-CODE 

75-80 

Transaction  date 

CR-TR-TRAN-DATE 

4.1.2  DTS  Labor  Records 

The  DTS  format  of  the  labor  distribution  record  contains  the 
data  elements  that  identify  the  nature  of  a maintenance  job  and  the 
number  of  hours  charged  to  that  job  by  a maintenance  employee.  The 
format  includes  neither  an  organization  code  nor  the  employee’s  hourly 
pay  rate  (except  when  the  employee  is  temporarily  upgraded) . The  last 
two  data  elements  are  obtained  from  an  employee  master  record.  A 
second  card  file  is  input  for  this  purpose. 
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X 

o 

Filler 

2 

X 

— 

time  Card  Indicator 

7 

X 

Filler 

-» 

X 

- 

Transaction  Modifier  Code 

7 

X 

Cs| 

Transaction  Day 
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FIGURE  4.1  1 

SIMS  REPAIR  COST  SYSTEM  INPUT  FORMAT  FOR 
ACTD  LABOR  DISTRIBUTION  RECORD 


Figures  4.1-2  and  4.1-3  describe  the  formats  of  the  DTS  Labor 
Distribution  Record  and  the  Employee  Master  Record.  The  former  record 
consists  of  the  following  data  items: 


Character 

Position  Data  Item 


COBOL 

Field  Name 


1-4 

5 

6-9 

10-12 

13-15 

16-17 

18-24 

25 

26-29 

30-33 

34-37 

38-41 

42-43 

44-45 

46 

47 

48-59 

60-61 

62-63 

64 

65-66 

67-68 

69-74 

75-80 


Filler 

Transit  identification  code 

Employee  number 

Filler 

Exception  hourly  pay  rate 
Premium  pay  code 
Filler 

Exception  pay  code 
Filler 

Work  order  number 
Account  number 
Vehicle  number 
Group  code 
Unit  code 
Work  type  code 
Reason  code 
Filler 

Regular  whole  hours  worked 
Regular  minutes  worked 
Filler 

Overtime  whole  hours  worked 
Overtime  minutes  worked 
Transaction  date 
Filler 


FILLER 

ID-CODE-T 

DTS-EMP-NBR 

FILLER 

DTS-P AY-RATE 

DTS-BONUS-CODE 

FILLER 

EXCP-PAY-CODE 

FILLER 

DTS-WO-NBR 

DTS-ACCT-NBR 

DTS-VEH-NBR 

DTS-VEH-CODE 

DTS-UNIT-CODE 

DTS-WORK-TYPE 

DTS-REASON-CODE 

FILLER 

DTS-REG-HRS 

DTS-REG-MIN 

FILLER 

DTS-OVTIM-HRS 

DTS-OVTIM-MIN 

DTS-TRAN-DATE 

FILLER 


The  Employee  Master  Record  contains  the  following  data  items: 


Character 

Position  Data  Item 


COBOL 

Field  Name 


1-4 

Department  code 

5 

Transit  identification  code 

6-9 

Employee  number 

10-37 

Filler 

38-39 

Job  classification 

40 

Filler 

41 

Acceptable  account  code 

42-44 

Filler 

IN-DEPT-CODE 

IN-TRANSIT 

IN-EMP-NO 

FILLER 

IN-FUNCTION-CODE 

FILLER 

IN-ACCOUNT-CODE 

FILLER 
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45 

Payroll  code 

IN-SIX 

46-50 

Filler 

FILLER 

51-53 

Hourly  pay  rate 

IN-PAY-RATE 

54-80 

Filler 

FILLER 
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"3" 

X 

sO 

Filler 

r» 

on 

o 

Transaction  Date  - MMDDYY 

* 

■O 

ON 

Overtime  - Minutes 

ON 

- 

Overtime  - Hours 

z 

X 

— 

Filler 

1 

ON 

- 

Straight-time  - Minutes 

i 

ON 

- 

Straight-time  - Hours 

X 

Filler 

K 

X 

- 

Reason  Code 

*x 

— 

Work  Type  Code 

f 

X 

- 

Unit  Code 

«* 

X 

- 

Group  Code 

* 

o 

® 

X 

Vehicle  Number 

.2. 

X 

<T  „ 

Account  Number 

X 

'J' 

Work  Order  Number 

' 

X 

Filler 

X 

-• 

Exception  Pay  Code  (=X) 

«T 

o 

X 

r- 

Filler 

1 

X 

- 

Premium  Pay  Code 

X 

m 

Exception  Hourly  Pay  Rate 

~o 

> 

Filler 

® 

X 

Employee  Number 

X 

- 

Transit  Identification  ToHe  (=j) 

X 

>3- 

Filler 

£1 

* s 

UJ  LXJ 

OC  H 

= > 
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DTS  LABOR  DISTRIBUTION  RECORD 


~o" 

"o" 

X 

Filler 

t 

O' 

CO 

Hourly  Pay  Rate  - 9v99 

T 

X 

- 

Filler 

$ 

O' 

- 

Payroll  Code  (=6) 

•T 

X 

CO 

Filler 

O' 

- 

Account  Code 

o 

»r 

X 

- 

Filler 

X 

- 

Job  Classification 

X 

00 

Filler 

O' 

- 

Employee  Number 

* 

X 

Transit  Identification  Code  (=T) 

- 

O' 

City  Department  Code 

4-8 


FIGURE  4.1  3 

SIMS  REPAIR  COST  SYSTEM  INPUT  FORMAT  FOR 
DTS  EMPLOYEE  RECORD 


4. 2 SIMS  Inputs 


The  Repair  Cost  System  requires  inputs  from  the  other  modules 
of  SIMS.  These  inputs  are  required  for  the  generation  of  reports. 

4.2.1  Inventory  Transaction  History  File 

The  Inventory  Transaction  History  File  is  maintained  by  the  SIMS 
Inventory  System.  It  contain  a permanent  history  of  all  inventory 
transactions . 

The  file  contains  23  types  of  records.  Only  two  types  of  records 

are  used  by  the  Repair  Cost  System.  The  materials  issue  and  return-to- 
stores  records  are  used  to  compute  the  cost  of  parts  charged  or  credited 

to  revenue  vehicles.  The  parts  costs  are  included  in  the  Bus  Repair 
Cost  reports. 

The  Materials  Issue  Record  and  the  Return-to-Stores  Record,  as 
defined  for  the  Repair  Cost  System,  contains  the  following  data  items: 


Character 

COBOL 

Position 

Data  Item 

Field  Name 

1-6 

Inventory  system  processing  date 

PROCESS-DATE 

7-8 

Inventory  class  code 

CLASS-CODE 

9-17 

Filler 

FILLER 

18-23 

Transaction  date 

TRANS-DATE 

24-25 

Transaction  code 

TRANS-CODE 

26-46 

Filler 

FILLER 

47-53 

Quantity  issued  (to  two  decimal 
places) 

ISSUE D-QTY 

54-88 

Filler 

FILLER 

89-92 

Work  order  number 

WORK-ORDER 

9 3-98 

Account  number 

ACCT-NO 

99 

Filler 

FILLER 

100-103 

Vehicle  number 

VEH-NO 

104 

Fleet  charge  indicator  code 

FLEET-CODE 

105-119 

Filler 

FILLER 

120-127 

Unit  price 

UNIT-PRICE 
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4.2.2  Vehicle  Master  File 


The  Vehicle  Master  File  is  maintained  by  the  SIMS  Service/Unit 
Change  System.  It  contains  a set  of  records  for  each  revenue  vehicle 
owned  by  the  property. 

The  file  contains  11  types  of  records.  Only  two  types  of  records 
are  used  by  the  Repair  Cost  System.  The  vehicle  header  record  is  used 
to  identify  each  vehicle  and  the  monthly  summary  records  are  the  source 
of  mileage  traveled  data.  During  report  generation,  monthly  mileages 
are  used  to  compute  per  mile  costs  for  the  report  period.  Such  costs 
are  displayed  on  both  the  Bus  Repair  Cost  reports  and  on  the  Main- 
tenance Labor  Cost  Report. 

The  Header  Record,  as  defined  for  the  Repair  Cost  System,  contains 


the  following 

data  items: 

Character 

COBOL 

Position 

Data  Item 

Field  Name 

1-2 

Record  format  code 

I-VEH-FORMAT 

3-6 

Bus  number 

I-VEH-NO 

7-12 

Date  of  record 

I-VEH-DATE 

13-14 

Fleet  code 

I-VEH-FLEET-NBR 

15-18 

Filler 

FILLER 

19-20 

Division  assignment 

I-ASSIGNMENT 

21-26 

Division  assignment  date 

I -AS SIGN- DATE 

27-28 

Prior  division  assignment 

I-PRIOR-DIVIS 

29-30 

Filler 

FILLER 
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The  Monthly  Summary  Record,  as  defined  for  the  Repair  Cost  System, 


contains  the  following  data  items: 


Character 

Position  Data  Item 


1-12 

13-17 

18-22 

23-26 

27-29 

30 


Filler 

Monthly  miles 
Monthly  fuel  consumption 
Monthly  oil  consumption 
Monthly  coolant  consumption 
Filler 


COBOL 

Field  Name 


FILLER 

I-MILES-MTD 

I-FUEL-MTD 

I-OIL-MTD 

I-COOL-MTD 

FILLER 


4.3  Job  Control  Cards 


Job  control  cards  are  necessary  for  the  execution  of  the  Repair 
Cost  System.  These  control  cards  include: 

(a)  Job  Control  Language  (JCL)  cards.  These  records  include 

two  record  types.  The  first  type  are  job  cards,  setup  cards, 
and  message  cards  required  for  job  submission.  The  contents 
of  these  records  vary  according  to  the  computer  center  re- 
quirements. The  second  type  are  execute  (EXEC)  cards.  These 
records  invoke  cataloged  procedures  stored  in  the  computer 
center's  procedure  library.  These  procedures  execute  the 
various  Repair  Cost  System  programs.  A description  of  the 
procedures  is  given  in  Section  5.0  of  this  document. 

(b)  request  date  cards.  These  records  control  the  generation 
of  reports  by  the  system  programs. 

The  Repair  Cost  System  may  be  run  in  one  of  two  ways.  Both 
methods  are  in  use,  one  at  each  of  the  two  properties  where  the  Repair 
Cost  System  has  been  installed. 

At  ACTD,  one  monthly  job  is  executed.  Maintenance  labor  trans- 
actions are  entered,  the  Labor  Transaction  History  File  is  updated,  and 
requested  reports  are  generated.  At  DTS,  two  separate  types  of  jobs 
are  executed.  The  transaction  history  file  is  updated  bi-weekly,  using 
the  labor  distribution  records,  as  one  job.  Reports  are  generated 
monthly  on  a stand-alone  basis. 

The  job  deck  for  the  all-inclusive  monthly  job  consists  of  the 
following  cards: 

(a)  Job  Cards,  as  required  by  the  computer  center. 

(b)  an  execute  card  to  invoke  procedure  RPCDATE,  which  creates 
a file  of  request  date  records. 

(c)  a data  definition  card,  marking  the  presence  of  request 
date  cards. 
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(d)  request  date  cards.  These  cards  are  required  by  report 
generator  programs  to  provide  a report  period.  Table  4.3-1 
lists  the  report  request  codes  and  date  requirements. 

(e)  an  execute  card  for  procedure  RPCU01,  which  processes  the 
labor  distribution  records. 

(f)  a data  definition  card — if  input  is  in  the  form  of  a card 
deck. 

(g)  a transaction  deck — if  card  input  is  used. 

(h)  execute  cards  for  procedures  to  produce  the  desired  reports. 
If  any  of  the  Bus  Repair  Cost  reports  are  requested,  an 
execute  card  for  the  procedure  to  extract  the  appropriate 
records  from  the  files  is  required.  Procedures  for  report 
generation  are  listed  in  Table  4.3-2. 

The  updating  of  the  Labor  Transaction  History  File  as  a separate 
job  is  accomplished  by  the  job  setup  sequence  steps  (a)  and  (e)  above; 
if  input  is  a card  deck,  steps  (fO  and  (g) . 

The  execution  of  report  generator  programs  on  a stand-alone  basis 
is  accomplished  by  submitting  job  cards,  request  date  cards,  and 
execute  cards  for  the  appropriate  procedures  without  processing  trans- 
actions . 

Detailed  instructions  for  job  submission  and  deck  setup  are  pro- 
vided in  the  SIMS  Repair  Cost  System  Operating  Instructions  Manual. 
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TABLE  4.3-1 


REPORT  REQUEST 
CODES  AND  DATES 

REPORT 
REQUEST  CODE 

TYPE  OF  REPORT  DATE  REQUIREMENTS 

R1 

Bus  Repair  Cost  Both  beginning  and 

ending  dates  of  re- 
port period 

R2 

Maintenance  Labor  Report  date  only 
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TABLE  4.3-2 


REPORT  GENERATION  PROCEDURES 


REPORT  TITLE 


Bus  Repair  Cost  By  Subassembly 

Subassembly  Repair  Cost-Division 
Summary 


REPORT 

CONTENT 

PROCEDURE 

Labor 

and  parts  cost 

RPCR45 

Labor 

cost  only 

RPCR50 

Parts 

cost  only 

RPCR55 

Hourly  Maintenance  Labor 
Utilization  Report 

Maintenance  Labor  Cost  Report 


RPCR40 


5.0  SYSTEM  PROCEDURES 

The  SIMS  Repair  Cost  (R/C)  System  is  currently  being  implemented 
at  two  transit  properties.  These  properties  are  Alameda-Contra  Costa 
Transit  District  (ACTD)  and  Dallas  Transit  System  (DTS).  In  each 
implementation,  the  R/C  System  is  installed  at  and  executed  by  a ser- 
vice bureau.  For  DTS,  the  service  bureau  is  the  municipal  computer 
center.  For  ACTD,  the  service  bureau  is  Optimum  System,  Inc.,  Palo 
Alto,  Calif. 

The  R/C  program  libraries  and  the  majority  of  system  files  reside 
on  a private  disk  pack,  TMDISK.  The  Repair  Cost  Transaction  History 
File  and  the  SIMS  Inventory  Transaction  History  File  are  on  magnetic 
tape.  The  procedures  for  executing  the  system  are  cataloged  in  the 
service  bureau's  procedure  library.  These  procedures  are  invoked  by 
user-supplied  Job  Control  Language  (JCL)  cards. 

The  R/C  procedures  are  basically  the  same  at  both  properties. 
There  are  certain  differences  between  the  procedures  used  at  the  two 
properties.  These  differences  are  the  result  of: 

(a)  output  requirements  of  the  properties, 

(b)  differences  in  the  format  of  transaction  input, 

(c)  variation  in  the  operating  procedures  of  the  computer  center 
where  the  R/C  System  is  installed. 

(d)  variation  in  the  computer  center  billing  alogrithums,  and 

(e)  program  region  size  availability. 

The  execution  of  the  R/C  System  is  described  in  terms  of  a basic 
job,  which  is,  in  turn,  broken  down  into  the  cataloged  procedures  that 
constitute  the  job.  Each  procedure  is  described  in  this  section  by  a 
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flowchart  and  a procedure  specification.  The  latter  consists  of 
following  items : 

Procedure  Name:  This  is  the  name  specified  in  the  execute  card 

included  in  the  job  deck. 

Program  Executed:  The  identification  and  name  of  the  program 
executed  under  the  procedure  is  specified. 

Functions : The  basic  purpose  of  the  program  is  briefly  described. 

Procedure  Flowchart:  A reference  to  the  associated  flowchart. 

Files : Both  input  and  output  files  associated  with  the  pro- 

cedure are  identified  by  file  name  and  data  set  name.  A reference 
to  the  section  describing  each  file  is  provided. 

Reports:  Reports  generated  by  the  program  are  specified. 

Other  Output:  Any  other  type  of  output  is  specified. 

The  procedures  comprising  the  regular  R/C  System  job,  RPCJOB,  are 
described  in  Section  5.1.  Listings  of  the  cataloged  procedures  as 
installed  at  ACTD  and  DTS  are  provided  in  Sections  5-2  and  5-3,  respec- 
tively. 
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5. 1 R/C  System  Execution 


The  Repair  Cost  System  may  be  run  in  one  of  two  ways: 

(a)  an  all-inclusive  monthly  job,  RPCJOB.  It  updates  the 
Labor  Transaction  History  File  (see  Section  6.1)  and 
produces  edit  reports  of  input  transactions.  Requested 
reports  are  also  generated.  The  system  is  run  at  ACTD 
in  this  mode. 

(b)  two  separate  jobs  are  executed.  One  job,  RPCUPT,  updates 
the  Labor  Transaction  History  File  and  produces  the  edit 
reports.  This  job  is  executed  on  the  same  time  cycle  as 

the  Maintenance  Department's  payroll  is  prepared.  The  second 
job,  RPCREP,  produces  the  on-demand  reports.  It  may  be 
executed  at  any  time  after  the  necessary  input  data  has  been 
processed.  The  system  is  run  at  DTS  in  this  mode. 

Table  5.1-1  lists  the  cataloged  procedures  associated  with  the 
all-inclusive  job,  RPCJOB.  The  job  stream  necessitates  execution  of 
the  procedures  in  a specified  order.  This  order  is  defined  in  Table 
5.1-1.  At  DTS,  the  file  updating  step  is  preceded  by  the  execution 
of  procedure  RPCEMP.  The  procedure  to  update  the  Labor  Transaction 
File  at  DTS  varies  from  the  one  used  at  ACTD  because  different  versions 
of  the  edit/update  program  are  executed  at  each  property. 

The  remainder  of  the  procedures  listed  in  Table  5.1-1,  RPCEXT 
through  RPCR55,  generate  the  on-demand  reports.  These  procedures  may 
be  executed  as  part  of  the  all-inclusive  job  or  on  a stand-alone  basis. 
The  order  in  which  the  procedures  are  executed  is  critical  since  they 
are  interrelated. 

Some  of  the  procedures  are  specific  to  the  transit  property.  This 
is  due  to  variations  in  input  sources  and  output  requirements.  The 
procedures  specific  to  DTS  are  RPCEMP  and  RPCU05.  The  procedure  spe- 
cific to  ACTD  is  RPCU01. 
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Figure  5.1-1  shows  a sample  job  setup  for  RPCJOB  as  run  at  ACTD. 
The  job  is  the  all-inclusive  job,  and  includes  requests  for  all  the 
on-demand  reports.  A detailed  description  of  job  submission  is 
provided  in  the  SIMS  Repair  Cost  System  Operating  Instructions  Manual. 
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(JOB  AND  SETUP  CARDS) 
/ /STEP1  EXEC  RPCU01 
/ /STEP 2 EXEC  RPCEXT 
/ /RPCEXT . DATECD  DD  * 
R1731001  731031 
R2731031 

//STEP 3 EXEC  RPCR40 
/ /STEP 4 EXEC  RPCEPL 
/ /STEP 5 EXEC  RPCR45 
//STEP6  EXEC  RPCR50 
//STEP 7 EXEC  RPCR55 


FIGURE  5.1-1 

ACTD  R/C  JOB  SETUP 
WITH  ON-DEMAND  REPORTS 
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TABLE  5.1-2 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME:  RPCEMP 

PROGRAM  EXECUTED:  EMPlCiO  - DTS  Employee  File  Generator 

FUNCTIONS : To  read  employee  data  cards,  and  produce  a file  of 
maintenance  employee  payroll  data 

PROCEDURE  FLOWCHART:  Figure  5*1-2 

FILES 


FILE  NAME 


DATA  SET  NAME  SEC.  REF. 


INPUT 


DTS  Employee  Card  File  EMPLCD 


6.7 


OUTPUT 

Employee  Master  File  CN1510.RPC.S.EMPFILE  6.6 


REPORTS 


Employee  Statistics 
Employee  Card  Edit  List 
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FIGURE  5.1-2 
PROCEDURE  RPCEMP 
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TABLE  5.1-3 


PROCEDURE  SPECIFICATION 
PROCEDURE  NAME:  RPCU01  - RPCOl 

PROGRAM  EXECUTED:  DA500A  - Data  Acceptance  (ACTD) 

FUNCTIONS : To  reformat  ACTD  labor  transactions  for  processing 

by  the  R/C  System 

PROCEDURE  FLOWCHART:  Figure  5.1-3 

FILES 

FILE  NAME  DATA  SET  NAME  SEC.  REF. 

INPUT 

ACTD  Labor  Transaction  File  AC . TIME . CARDS  6.h 

OUTPUT 

Temporary  Labor  Transaction  &RPCTRAN  6.12 

File 


REPORTS 


Data  Acceptance  Edit  List 
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FIGURE  5.1-3 

PROCEDURE  RPCU01-RPC01 
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TABLE  5.1-U 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME:  RPCUOl  - RPC03 

PROGRAM  EXECUTED:  DG5GOA  - Labor  Transaction  History  File 

Edit/Update  (ACTD) 

FUNCTIONS : To  read  and  edit  reformatted  input  transactions,  and 

update  the  Labor  Transaction  History  File 

PROCEDURE  FLOWCHART;  Figure  5.1-b 

FILES 

FILE  NA ME  DATA  SET  NAME  SEC.  REF. 


INPUT 


Temporary  Labor  Transaction 
File 


&ROCTRAB 


6.12 


Transaction  History 
File 


CN1510.RPC.M. 

tranhist(o) 


6.1 


OUTPUT 


Labor  Transaction  History 
File 


CN1510.RPC.M. 

TRANHIST(+1) 


6.1 


REPORTS 


Labor  Transaction  Edit  List 
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FIGURE  5.1-4 

PROCEDURE  RPCU01-RPC03 
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TABLE  5-1-5 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME:  RPCU05  - RPC05 

PROGRAM  EXECUTED:  DA500D  - Data  Acceptance  (DTS) 

FUNCTIONS : To  reformat  DTS  labor  transactions  for  processing 

by  the  R/C  System. 

PRROCEDURE  FLOWCHART:  Figure  5.1-5 

FILES 

FILE  NAME  DATA  SET  NAME  SEC.  REF. 


INFUT 

DTS  Labor  Transaction  File  DTS .TIME-CARDS  6.5 

Employee  Master  File  CN1510.RPC. S.  6.6 

EMPFILE 


OUTPUT 

Temporary  Labor  Transaction  &RPCTRAN  6.12 

File 


REPORTS 


Data  Acceptance  Edit  List 


DATA 

ACCEPTANCE 
EDIT  LIST 


FIGURE  5.1-5 

PROCEDURE  RPCU05-RPC05 
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TABLE  5.1-6 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME:  RPCU05  - RPC07 

PROGRAM  EXECUTED:  DG50OD  - Labor  Transaction  History  File 

Edit/Update  (DTS) 

FUNCTIONS:  To  read  and  edit  reformatted  input  transactions,  and 

update  the  Labor  Transaction  History  File 

PROCEDURE  FLOWCHART:  Figure  5.1-6 

FILES 


FILE  NAME  DATA  SET  NAME  SEC.  REF. 


INPUT 

Temporary  Labor  Transaction  &RPCTRAN 
File 

Labor  Transaction  History  CN1510 .RPC .M. 

File  TRANHIST( 0 ) 


OUTPUT 

Labor  Transaction  History  CN1510 .RPC.M.  6.1 

File 


6.12 

6.1 


REPORTS 


Labor  Transaction  Edit  List 


FIGURE  5.1-6 

PROCEDURE  RPCU05-RPC07 
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TABLE  5.1-7 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME:  RPCEXT 

PROGRAM  EXECUTED:  REIOO  - Vehicle  File  Extract 

FUNCTIONS : To  read  the  Vehicle  Master  File  and  produce 

one  extract  record  per  vehicle  containing 
fleet,  division,  and  mileage  data 

PROCEDURE  FLOWCHART:  Figure  5.1-7 

FILES 


FILE  NAME 


DATA  SET  NAME  SEC.  REF. 


INPUT 

Vehicle  Master  File 
Date  Card  File 

OUTPUT 

Report  Request  File 
Vehicle  Extract  File 


CN1510.SRV.M.  6.3 

VEHICLE ( 0 ) 

DATECD  6.11 


CN1510.RPC.S.  6.10 

DATEFILE 

&BUSLST  6.16 


REPORTS 

None 
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FIGURE  5.1-7 
PROCEDURE  RPCEXT 
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TABLE  5.1-8 

PROCEDURE  SPECIFICATION 


PROCEDURE  NAME:  RPCRUO  - RPClO 

PROGRAM  EXECUTED:  CLASSM  - Maintenance  Report  Extract 

FUNCTIONS : To  read  the  Labor  Transaction  History  File,  and 

extract  records  that  apply  to  a user  specified 
report  period 

PROCEDURE  FLOWCHART:  Figure  5.1-8 

FILES : 


FILE  NAME  DATA  SET  NAME  SEC.  REF. 


INPUT 


Labor  Transaction  History 
File 

CN1510.RPC.M. 
TRANHIST(  ) 

6.1 

Maintenance  Report  Classifi- 

MCLASS 

6.9 

cation  File 

Report  Request  File 

CN1510.RPC.S. 

DATEFILE 

6.10 

OUTPUT 

Labor  Hours  Extract  File 

&LAB0R 

6.13 

REPORTS 


List  of  Accounting  Classification  Exceptions 
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FIGURE  5.1-8 

PROCEDURE  RPCR40-RPC40 
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TABLE  5-1-9 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME:  RPCRUo  - RPC42 

PROGRAM  EXECUTED:  M1M200  - Maintenance  Report  Generator 

FUNCTIONS:  To  read  a file  of  labor  transactions,  and  produce 

reports  of  maintenance  yopk  uerf’or'med 

PROCEDURE  FLOWCHART:  Figure  5-1-9 

FILES 

FILE  NAME  DATA  SET  NAME  SEC.  REF. 

INPUT 


Maintenance  Report  Generator 
Control  File 

MCNTRL 

6.8 

Report  Request  File 

CN1510.RPC.S. 

DATEFILE 

6.10 

Labor  Hours  Extract  File 

&LAB0R 

6.13 

OUTPUT 

None 


REPORTS 


Hourly  Maintenance  Labor  Utilization  Report 
Maintenance  Labor  Cost  Report 
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FIGURE  5.1-9 

PROCEDURE  RPCR40-RPC42 
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TABLE  5 . 1-10 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME:  RPCEPL  - RPCE01 

PROGRAM  EXECUTED;  RE200  - Materials  Cost  File  Extract 

FUNCTIONS : To  read  the  Inventory  Transaction  History  File, 

and  extract  records  of  materials  issued  for 
vehicle  maintenance 

PROGRAM  FLOWCHART:  Figure  5-1-10 

FILES 


FILE  NAME  DATA  SET  NAME  SEC.  REF. 

INPUT 

Inventory  Transaction  History  CN1744.  INV.M.  6.2 

File  TRANTAPE(O) 

Vehicle  Extract  File  &BUSLST  6.l6 

OUTPUT 

Materials  Cost  Extract  File  &PTC0ST  6.15 


REPORTS 

None 
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FIGURE  5.1-10 

PROCEDURE  RPCEPL-RPCE01 
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TABLE  5.1-11 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME : RPCEPL  - RPCE03 

PROGRAM  EXECUTED:  RE300  - Labor  Cost  File  Extract 

FUNCTIONS:  To  read  the  Labor  Transaction  History  File,  and 

extract  records  of  employee  costs  for  vehicle 
maintenance 

PROCEDURE  FLOWCHART:  Figure  5.1-11 

FILES 

FILE  NAME  DATA  SET  NAME  SEC.  REF. 


INPUT 

Labor  Transaction  History  CN1510.RPC.M.  6.1 

File  TRANHIST(  ) 

Vehicle  Extract  File  &BUSLST  6.16 

OUTPUT 

Labor  Cost  Extract  File  &LBC0ST  6.1b 


REPORTS 


None 
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FIGURE  5.1-11 

PROCEDURE  RPCEPL-RPCE03 
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TABLE  5-1-12 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME:  RPCR^5 

PROGRAM  EXECUTED:  RP080  - Bus  Repair  Cost  Report  Generator 

FUNCTIONS : To  produce  a report  of  material  labor  costs 

of  vehicle  maintenance  by  vehicle  number 

PROCEDURE  FLOWCHART:  Figure  5-1-12 

FILES 


FILE  NAME 


DATA  SET  NAME  SEC.  REF. 


INPUT 

6.  ik 

6.15 

6.16 


Labor  Cost  Extract  File  &LBCOST 
Materials  Cost  Extract  File  &PTCOST 
Vehicle  Extract  File  &BUSLST 


OUTPUT 

None 


REPORTS 


Bus  Repair  Cost  By  Subassembly 
Subassembly  Repair  Cost  - Division  Summary 
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FIGURE  5.1-12 
PROCEDURE  RPCR45 


TABLE  5-1-13 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME:  RPCR50 

PROGRAM  EXECUTED:  RP080  - Bus  Repair  Cost  Report  Generator 

FUNCTIONS : To  produce  a report  of  labor  cost  of  vehicle 

maintenance  by  vehicle  number 

PROCEDURE  FLOWCHART:  Figure  5-1-13 

FILES 


FILE  NAME  DATA  SET  NAME  SEC.  REF. 

INPUT 

Labor  Cost  Extract  File  &LBCOST  6.lU 

Vehicle  Extract  File  &BUSLST  6.l6 

OUTPUT 

None 


REPORTS 

Bus  Repair  Cost  By  Subassembly  - Labor  Only 
Subassembly  Repair  Cost  - Division  Summary 
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WORK 

AREA 


YSDA 


&SORT 


WORK 

AREA 


WORK 

AREA 


<LSYSDA_> 

&BUSLST 

RP080 

&LBCOST 

< 

SUBASSEMBLY 
REPAIR  COST- 
DIVISION 
SUMMARY 


BUS  REPAIR 
COST  BY 
SUBASSEMBLY- 
LABOR  ONLY 


FIGURE  5.1-13 
PROCEDURE  RPCR50 
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TABLE  5.1-lU 


PROCEDURE  SPECIFICATION 


PROCEDURE  NAME;  RPCR55 

PROGRAM  EXECUTED;  RP080  - Bus  Repair  Cost  Report  Generator 

FUNCTIONS:  To  generate  a report  of  materials  cost  of 

vehicle  maintenance  By  vehicle  number 

PROCEDURE  FLOWCHART:  Figure  5.1-lU 

FILES 


FILE  NAME  DATA  SET  NAME  SEC.  REF. 

INPUT 

Materials  Cost  Extract  File  &PTCOST  6.15 

Vehicle  Extract  File  &BUSLST  6.1 6 

OUTPUT 


None 


REPORTS 


Bus  Repair  Cost  By  Subassembly  - Parts  Only 
Subassembly  Repair  Cost  - Division  Summary 
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FIGURE  5.1-14 
PROCEDURE  RPCR55 
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5. 2 ACTD  Cataloged  Procedures 


This  section  contains  listings  of  the  R/C  System  procedures  as 
currently  installed  at  ACTD.  Table  5-2-1  lists  the  procedure  names 
and  corresponding  figure  numbers  for  the  JCL  listings. 


TABLE  5.2-1 


ACTD 

PROCEDURE  NAME 
RPCU01 
RPCEXT 
RPCRUO 
RPCEPL 
RPCR45 
RPCR50 


CATALOGUED  PROCEDURES 

JCL  LISTING  FIGURE 

5.2-1 

5.2-2 

5.2- 3 

5.2- 4 

5.2- 5 

5.2- 6 


RPCR55 


5.2-7 


//*  CTL  CN=1510,  JPATF=73?39 

//PPOUOl  PROC  ACNT=* CNISIP.SRV*  , ACNT2=  • CN  15  10  .R  PC  • ,GEN=,-4' 

//P°  r01  FXFC  PCM=PA500A,CC  ND=(7  , LF)  , RFGI0N=60K, 

//  PAFM='  AC  TRANSIT  • 

//STFPUP  pn  PSN  = eACNT..V.OA"t,r)ISP  = SHR,VOL=(PRIVATE,  RETAIN) 
7/SYSUDUMP  on  SYSOUT=f 

//PRINT01  OD  SYSPUT=A, ->CB=(RECPM  = FB,LRECL=I33,BLKSIZE=i330) 
//IMS TP 03  np  PSN  = AC .TIMF .CAROS  *LAPEL=( , B L P ), UN IT= ( 2400, t DEFER ) , 

/ / PT  SP=PLD  , PCB=  (RECFPi=P3tLRECL  = 8a,BLKS  IZE=2000  » ,VOL  = SER=DAT  A01 

//PMSTPP4  DP  DSN=&RPCTR AN, 3ISP=(NEW,PASS),UMIT=231At 

//  0Cfc.  = ( RECFM  = FB,LRECL=l2  3t  6LKS  IZE=7200  >,SPACE=(CYL,(9,1»,RLSE) 

/ / P PC  0?  FXEr  PGIw  = PG500AtC0'ir)  = (7,LE)fREGI0N=180Kt 
//  pap  Mr-  * AC  TRANSIT  • 

//PTPPi.Tp  no  OSN  = £ACNT..L  TAD,DISP  = SHR,VOL  = (PRIVATE,  RETAIN) 

//ynirrp  Dn  o SN=  t ACNT  2 . . ’<1 . TR  A NH I S T ( &G  EN . ) , D I SP  = ( OLD , PAS  S ) 
//RYSUnUMp  pn  SYSOUT=A 

//dptmtot.  op  SYSOUT  = A,OCB  = ( RECF  ^=FB,LRECL  = 133  , BLKSIZE=1330  I 
//TTPANTl  OD  0SN=EACNT2.  . .T  R ANH I ST  ( 0 ) , D I SP=OLD,  UNIT  = ( 2400 , , DEFER  ) 
//TTRAN05  On  DSN  = f, RPCTRANtDI  SP  = (OLD,  PASS  I 

//DTRAN06  nn  0SN  = SACNT2. .M.TRA1HI$T(+1),DI SP-  < NE W ,C A TIG , DELET E ) , 

//  vriL=RFF=*.  VOIRE-, 

//  LAB  PL  = I ,SL)  ,UNIT  = (2A-3">,  » DEFER) » 

//  PCB=( RECFM=FB,IRECL=120 , 3LKS I ZE  = 312 00) 


FIGURE  5.2-1 

ACTD  PROCEDURE  RPCU01 
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//*  CTL  rN  = lF10t  JCVT‘:  = 732  3P 

//oprcxT  PROC  flCNT=,rN151 3 . S RV' * 3CNT  = *CN1510«RPC' 

//PorrXT  EXEC  PGM  = RFl3  3B»REGI0N=60KtCClND=(7»LE) 

//ST^Pl.!*  on  DS'J  = EArNT..LDAD»3l"SP=SHRfV0L  = PRIVATE 
//SYSCMJT  on  SYSOUT=a 

//SYSUnUMO  00  SYSoUT=A 

/ / ! M ^T°  0 1 or)  DSN  = f ACIMT  . . M.  VEH I CL  F O ) * DI S P=OLDt  VOL=PR  IVAT  E 

/ / Tr  a p 0Q3  OD  DDNAME  = DATEC,D 

//pmctro?  no  DSV=£6USLST,DIS®=tNEW»PASS)  , 

//  UMIT=?31A,SPACE=(TPK,( 103,20) ,RLSE), 
ft  0CB= ♦LPFCL=18,BLKSI7c=7272fRECFM=PR) 

/ /OPPNTOA  DO  SYSnUT=A,DC3=(LRECL=133,BLKSIZE=133,RECFM=F) 

//P0ATE06  00  DSN- SBC  NT  • • S.OATFFTLE.OI S P= OLD, VCL= PRI V ATE » CC6=BUFN0= 1 


FIGURE  5.2-2 

ACTD PROCEDURE  RPCEXT 
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//*  C.  TL  CN=1510,JDATE=73239 


//DPfR40  PR  nr.  ACNT='  TNI  51  3.  SRV*  , D SK=  • TMD I SK  • , ACNT2=  • CN 1 5 10 . RPC • , 
//  VFPS=,+1* 

/ARPC40  PXFC  PGM  = CLASS M , REG IQN= 150K, COND= (7  » L F ) 

//STEPLI0  DO  DSM=CACN7.. LOAD, OISP=OLD»VOL= PRIVATE 
//GYSUDUMP  DD  SYSOUT=A 

//rNTRLOl  DO  DSN= MC L ASS, DISP=OLD,UN I T=23 14, VOL=< PRIVATE, SER=6DSK. ) 
//PRTNT02  DD  SYSDUT  = A , DC  B=  ( RF  CF'I  =F  B , LR  EC  L=  133  , BLKS I Z E=1330 ) 

// ITRAAP3  DD  0SN=£ACNT2.  .M.TRANHIST(  S.VER  S.  »,DI  SP=OLD  ,UNIT=2400 
/ / D T R A M 0 4 DD  DSN  = f.  LABOR, DISP=(NE^, PASS), UNIT  = 2314, 

//  SPACP= (rYL, ( 6, 1) ) » DD  ( REDFM=FB,LRECL=80,BLKSIZE=7280 ) 
//r.NTR|.05  DO  DSN=  f.  ACNT2  . • S . 0 AT  EF IL  E,  D ISP  = OLD  , VOL  = PR  I VAT  E 
//SYSniJT  DD  SYSOUT=A 

/ / PP C4 ? EXEC  PGM=M1M200,REGI3N=I30K,COND  = (7,LE) 

//STEPLTR  DO  DSM=£ ACNT . . LOAD , D IS P=QL D, VOL=PR IV AT E 
//SYSUnUMP  DD  SYSDUT=A 

//ttpanoI  DD  DSN=tLAROR, DISP=( OLD, DELETE ) 

//RP.  INT02  On  SYSnUT=A,0r.B=tRECFM  = F9,LRECL=133,BLKSIZE=1330) 

/ /CNTRL03  DD  DSN=  MCNTRL,DISP-3LD»UMIT=2314,V0L=(PRIVATE*SER=£DSK.) 


/ / T MST  R<94  no  DUMMY,  DC  B=  ( R ECF Y = F , LR  ECL  = 500 0,  BLK  S I Z E=5  000 ) 


//T^STROE  DUMMY ,DCB=( RECcM=F,3LKSI ZE=30) 

//DATED*  DD  DSM=CACNT2«. S. DATAFILE, DISP=DLD,VOL=PRIV AT E 


FIGURE  5.2-3 

ACTD PROCEDURE  RPCR40 
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//*  CTL  CN=15 10, JTATP=7123 9 

// P.PCF^L  PROC  ACNT='CN1510.SRV*  ,BCNT=«C N1744. INV* , 


//  C<"NT=  •CN1510.PPC'  ,VERS-*  + L' 

//R°CE01  FXFC  PGM=RE2O0 A,RECICN= 165K,COND=< 7, LF ) 
//STrptTP  no  nSN  = &ACNT ■ . LOA  3 »" DI S P=SHR , VOL-PRI VAT E 
/ / WK  n l 00  OSN=£TSORT , UNIT  = 2314,01 SP= (NEW, DELETE) 

//  SP ACE= (CYL , (6  » 1 1 » , CONT I G) , 

ft  Of  B= ( RECFM  =FB , LREC  L=1 8 , BLK  S I ZE=7272 I 


/ / WK02 
/ / 

/ t 


00  OS  N=  SOS ORT , JN I T = 23  14,  D I SP  = ( NEW  , D EL  ETE  I 
SP  ACE=( CYL ,(6,1 ) , ,COMTIG), 
0CB=(RECFM=FB,LRECL=18*ELKSIZE=7272) 


t 


//SnRTlT P 00  DSN=SYS 1 .SORTL rB,DISP=SHR 
//SYS^MT  oo  SYSCMT=A 
//SYSU^UMP  00  SYSOUT=A 

//SORTWKOl  on  UNIT=SYSDA,SPACF=(CYL , (6, 1 ) , , CONT I G ) 
//VV5TMK0?  00  lJNIT=SYSOA,SPACE=(CYL,  (6, 1)  ,,COMIGI 
//SOptuko?  00  'JN!  TT= SYSD A, S P ACE=< C YL , (6,  1) . ,CONTIG) 
//HPRNTOO  00  DUMMY , DC 3=( OECFM=F, ELKS IZE= 133) 

00  0UMMY,DCB=(RECc'-1=F,PLKSTZE  = 133  ) 

//3°P^TO?  no  0UMMY,0CB=(  RPCCM=F  ,PLKSI  ZF  = 1331 
//PMSTR01  n0  DSN=£BUSLST  ,3IS  P = (OLO,  PASS  I 

//TTPAMQ3  ^0  DSN  = 5BCNT  . . M.  TRA.NT  AP  E ( 0 ) ,01  SP=0LD*UNIT=2400 
/ / PT  p ANr4  00  OSN=OPTCOST,3!Sc>=(NEW,PASS),UNIT=23l4, 

//  DCB=(PECFM=FB, LRECL= 1 8 , ELKS  I ZE=7272 ) , 

//  SPACE=rrPK,(  100,20),PLSE  ) 


//R°CF03 
//STCPL I B 
//WK  3 1 
// 

// 


EX  FC  PGM=RE300A*REGION=165K,COND=(7,LE ) 

00  OS M = £ AC  NT . .LOAO,OI SP=SHP ,VCL  = PRI VAT E 
00  OS N=£IS0RTtJNTT=23l4,DISP= (NEW, DELETE) , 
S P A 0 E= l C Y L , ( 6 , 1 ) , , CONT I G ) , 

DC  P = (PECFM=FB, LRECL=18 ,BLKSI ZE  = 727  2 ) 


//W<n? 

// 

/ / 

//SORTIT ° 

//SYSC’JT 

//SYSUOMMP 

//sortukoi 

//SnPT.JK  02 
/ / SO7  F'a|K  03 
/ /OPRNTCO 

/ /ODR\'Tn  i 

X/0PRNT02 


00  OSN-COSORT , JNI T=2314*DISP= (NEW, DELETE ) , 
SDACE=(CYL,16,1),,CCNTIG), 

OCP=  (RECFM  = F3,LRECL=18,BLKSIZE=7272) 

00  0SN=SYS1.S0RTL IB,DISP=SHR 
00  SYSnUT=A 
00  SYSOUT=A 

OD  UNIT=SYSOA,SP ACE=(CYL, (6, 1 ),,CONTIG) 

0^  L'NIT=SYSDA,  SPACE=(CYL,  (6, 1 ) ,,  CONT  I G ) 

OH  UN  I T= SYSD A, SPACE=(CYL,(6,  1),,C0MTIG) 

00  DUMMY , DC B=<  R EC.F  M=  F , BLKS  IZE=133) 

0 0 DUMMY, DC B=(  1ECFM=F,PLKSIZE  = 133> 

00  DUMMY *DCB=(RECF4=F,3LKSTZE=133) 


//PMSTR01  00  DSN=£8USL$T , 0 T S P= ( OLD , PASS ) 

//ILABR05  00  0SN=SCCNT..M.TRANHIST(£VERS.),DISP=0LD,LNIT=2400 
//PLABRD6  DO  OSN=£LRCOST , DIS®  = (NEW, PASS ), UNIT=2314, 

//  DCB=(RECFM=FB,LRECL=18,BLKSIZE  = 7272  ), 

//  SPACE=  (TRK,(  100,20),RLSp  ) 


FIGURE  5.2-4 

ACTD  PROCEDURE  RPCEPL 
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//*  CTt  CN=1510»J0ATE=73239 
//RPCP45  PROC  ACNT^rNlSLO.SRy* 

//RPCR45  CXCC  PGM=RP080B,REGIC  >)=  1 50K,C0ND=  f 7 , LEJ  , 

//  P4PM=»  AC  TRANSIT  • 

/ / ST  p PL  I p 00  DSN=  £ AC NT . .L  TAD, DTSP=SHR,VOL= PRIVATE 

//SORTLIB  OD  DSN=SYS1.S0RTLI 3,01 SP=SHR 

//SORT WK 01  DP  IJNIT=SYSDA,SPACE=(CYL,(3*1),*C0NTIG) 

//SORT WK 02  00  UN  I T = SY SDA , S PACE  = < CYL , { 3 , II , , CONT I G ) 

/ / S 0 R T WK 0 3 00  |JNIT=SYSDA»SPACE  = ( CYL,  ( 3,1  ) , ,CONTIG) 

//SYS OUT  nn  dumvY 

/ / W K 0 1 00  DSN  = €SnRT,UNIT  = 2314, 0!SP-(NEW, DELETE), 

//  SFAC  E=  (CYL,<  £■,  II,  , CONTI  G > , OC  B=  ( R FCFM  =«=B , LRFCL  = 97  ,6LKS IZE=7275  ) 
/ /WK  02  OP  DSN=£REPORT  , UN  IT=2314,  DISP={NEW,OELETE  ) , 

//  S pAC F= (C YL,(6, 1) , , CONTI G I , DC 3= ( RFCFM=F B, LRECL=97 , BLKS IZE=727  5 » 
//PMSTR02  DO  OSN=£BUSLST,DISP=(OLO,PASS» 

//PLABR06  00  DSN  = f. LBCOST  ,DISP=(0LD,  PASS) 

//PTRAN04  DO  DSN= £PTC OST , 0 1 S P = < OL 0 , P A S S ) 

//QPRNT01  00  SYSQUT=A,0CB=(RECFN=FB,LRECL=133,BLKSIZE=7182I 
//SYSUDUMP  00  S YSOUT= A 


FIGURE  5.2-5 

ACTD  PROCEDURE  RPCR45 
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//*  CTL  CN=1510, JDATE=73239 
//o PCR50  PROC  AC  NT  = ' CN1 5 10 • SR V' 

//PPTR50  EXEC  PGM  = RP080B , REGI  CL^l  50K  ,C0ND=  (7  , L E ) , 

//  P AP  M = * AC  TRANSIT  - LABOR  ONLY  • 

//STFPLTB  DO  OSN=£AC NT.. LOAD, DISP=SHR,VOL= PRIVATE 
//SORTLIB  DD  OSN=SYSl.SORTLI 3,01 SP=SHR 
/ / SO RT WKO l DO  UMIT  = SYSDA,SPACE  = (CYL,(3,l),,CONTIG) 

//S0RTWK02  DO  UNIT=SYSDA,SPACE=(CYL,(3,1 ),,CONTIG) 

//SnRTWKO?  DD  UN  I T=SYSDA , SPACE  = C CYL, ( 3, 1 ) , ,CONTIGI 
//SYSOUT  DO  DUMNY 

/ / W K 0 1 DO  OS N=£SORT,UNIT=2314,OTSP=(NEW, DELETE), 

//  SPAC  E= (CYL , ( 6 , 1 ) , ,CONTIG ) , DCB= (RECFM=F8, LPECL=97 ,BLKS IZE=7275  ) 
//WKD2  DD  DSN=£REPORT, UN IT  = 2 3 14 , 0 1 S P= l NE W , DELETE) , 

//  SPACE=(CYL,(6,1) , ,CONTIG) , DC B= ( RFCFM=F B, LR ECL=97 , ELK S I Z E=7 27 5 ) 
//DMSTR02  DO  DSN=CBUSLST,DISP=(OLD,PASS) 

//PLAPR06  DD  DS\'=CLBCOST  ,DIS3  = (0LD,  PASS) 

//PTRANOA  DD  DUMMY»DCB=(R3CF*=P,BLKSIZE=13) 

//OPRNTOi  DO  SYSOUT=A,DCB=(RECFN=FB,LRECL=133,BLKSIZE=7182) 
//SYSUDUMP  DD  SYSOUT= A 


FIGURE  5.2-6 

ACTD  PROCEDURE  RPCR50 
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//*  CTL  CN=1510, JDATE=73239 
//RPCP5E  PPOC  ACNT  = * CN1 5 1 0 . SRV' 

/ / R P C R 55  E Xc  C PGM=RP080B,REGICN=150K,CGND=(7,LE) , 

//  PAPM=*  AC  TRANSIT  - PARTS  ONLY  • 

//STPPLT0  DO  DSN=£ACNT..LOAO,DISP=SHP,VOL=PRIVATE 
//SORT WK 01  OP  UNI T=SYSDA ,SPACE=(CYL, ( 3, 1 ) , ,CONTIG) 

//SHRTWK02  DO  UN  IT  = SYSDA ,SP ACE=(CYL, ( 3, 1 ) , .CONTIG ) 

//SORT WK 03  00  UNIT=SYSDA,SPACE=(CYL, 13,1 ) , , CONT I G ) 

//Sn°TLI B 00  0SN=SYS1 .SORTLI 3,01 SP=SHR 
//SYSOIJT  on  DUMMY 

//WK.01  00  OSN  = £SOPT,UNIT  = 231i*,OlSP=(NEW, DELETE), 

//  SPACE=(CYL,( 6, 1) , , CONTI G ) , 0C3=(RECFM=FB, LPECL=97 , BLKS I ZE  = 7 27  5 ) 
//WI02  00  PSN=£REP0PT,UNIT=2314,DISP=(NEW, DELETE), 

//  SPACE=(CYL,(6,1), , CONTI G) ,DC  B* ( R E CFM  = F B , LR ECL=97 , BLK S IZ E=7 27 5 ) 

//PMSTR02  OH  DSN=6BUSLST ,DIS3=(OLO,PASS) 

//RL«BP06  00  DUMMY, DCB=(RECR"=F,BLKS! Z E= 1 8 ) 

//PTR AN04  00  PSN=£PTCOST ,01 S°=(OLD*PASS) 

//OPR  N T0  1 DO  SYS0UT  = A,DCB=(RECM  = FB,LRECL=133,BLKSIZE=7182I 
//SYSUOUMD  no  SYS  OUT  = A 


FIGURE  5.2-7 

ACTD  PROCEDURE  RPCR55 


5-42 


5. 3 DTS  Cataloged  Procedures 


This  section  contains  listings  of  the  R/C  System  procedures  as 
currently  installed  at  DTS.  Table  5-3-1  lists  the  procedure  names 
and  corresponding  figure  numbers  for  the  JCL  listings. 


TABLE  5.3-1 


DTS 

CATALOGED  PROCEDURES 

PROCEDURE  NAME 

JCL  LISTING  FIGURE 

RPCEMP 

5.3-1 

RPCU05 

5.3-2 

RPCEXT 

5.3-3 

rpcrUo 

5.3-4 

RPCEPL 

5-3-5 

RPCRU5 

5.3-6 

RPCR50 

5.3-7 

RPCR55 

5.3-8 

5-4L 


//*  0 T L=  OA  LL  A S TRAN SIT, J0\TF=Z3305 

//h^Cc'<P  PP.nC  AC*  T = * CNISIO.SRV'  , BCNT= 'CN1510.RPC • 

//3PCrMp  Fxrr  103  ,CGN  ) = ( 7,LE)  , REG  l 0N=  1 2 OK  , 

//  PA;M=*  DALLAS  TRANSIT  • 

/ / S T F PL  T 3 on  DSN=RACNT . .LDAD,OI SP=GLD, VOL=PRIVATE 
//  OO  DSN=PPSORT , 01  SP  = S -R 

//S3RTHK01  no  UN IT=SYSDA ,SPAG2= (CYl , < 1 , 1 ) , ,CONTI G) 

//SJRTWK02  DO  UNI T=SYSDA,SPACE=(CYL,( 1,1 ),,CONTIG) 

//SORTWOD  DO  UN  I T=SYSDA ,5PACE=( CYL , ( 1 , 1 > , , CONTI G) 

//SnRTLIP  no  nSN=PSRTL 19, OIS J=SHR 
//SYsnijT  no  nuM^Y 

//V-.K3  1 OD  DSN  = €I  SORT, UNI  T = 33  3 D , D l S P= ( NEW , DELETE)  , 

/ / OCB= ( RFfFM  = FP, LRECL  = 13, 9LK3I ZE=6480  ), SPACE= (CYL, ( 1 ,1 > , ,C0NTI3 ) 
/ / p R T N T 0 1 00  SYSOUT  = 4,DC9=(RECF^F8,LRECL  = i.33,BLKSIZE=l330) 

//PR  INTO  2 on  SYSDUT=  A , OC 3= ( R EC FM  = FB , L REC L= 133 , BLKS I Z E= 1 3 3 0 ) 
//SYSUOIJMP  nn  SYS  OUT  = A 

//ODISKOl  OD  nSN  = F8C  nIT..  S.EMPF(LF,DI  SP  = 3L0,V0L=PRIVATE 
/ / I N °U  TO  1 00  OONA ME  = FMPLCO 


FIGURE  5.3-1 

DTS PROCEDURE  RPCEMP 
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//*  CTL=OALLAS  TRANSIT ,J0ATE=73305 

/ / RPCU'"*5  PROC  ACNT=*CN15L  0.  SRV'  , AC  NT  2 = ' C N15  10 . RPC ' 

//I-’PTOS  FXFf  PGM=DA5  )OD,COND=(  /,  Lr  > , RFGIUN=120K, 

//  PAS‘4='  OULAS  TRANSIT  • 

/ / S T r PL  IP  no  OSN=F.ACNT..L  )AD,  3 I S P = SH  R , VOL  = < P P I VA  T E , R ETA  I N ) 

//  00  nSN=PPSnRT,DISu=SH< 

//svsnuT  no  sysout=a 

//SYS UDUMP  on  SYSHUT  = A 

/ / S 0 U T L I 3 nn  OSN=PSRTL IB,  )IS J=SHR 

//SORT, ,/KOI  nn  UNI T=SYSDA , SPACE=(CYl, ( 6 ,1 ) , .CQNT1G) 

/ / S N B T NK02  DO  UN  IT=SYSOA, S°AC  c= I CYL, ( 6, l ) , , C ONT I G ) 

//SORTWKO?  do  UNIT=SYSDA,SPACE=(CYL,<6,1 >,,C3NTIG) 

/ / Pp  I NT  a l DO  SYSDUT  = A ,DCI3  = UECF  4=F8,LRECL=133,BLKSIZE=1330  ) 
//P'STPOl  no  DSN  = E T R AN  S » 0 1 S P = ( N E W , DE L F TE  I , 

//  UNT  T = 3?3  0,  SPACE=  {CYL  , (5 ,1  ) ) ,1'C  1=(  REC FM=F B ,LR ECL =80 , BLKS  I ZE=  54dJ  ) 
//I'RSTPn?  DO  nSN  = C ACMT2. . S.E 4PFI LE ,DI SP=OLD, VGL  = PRI V ATE 
/ / I^STROl  DD  DSN  = nTS .TINE .CAROS, LABEL  = ( »BLP),UNIT=( 2400, , DEFER ) , 

//  DI SP=( NEW, KEEP, KEEP) , DC  3= < RECF M = F , LR ECL= 80 , BLK S I Z E= 8 0 , 

//  TRTCH  = T,DFN=2,RUFN  ) = 4) ,VOL= SEP =PC DATA 

/ /OTP  ANQ6  nn  OSN=£SORT  ,0TS=»=  (NE*, DELETE), 

//  UNI  T=33  3 0,  SPACE  = ( CYL  , (6  , L ) ) , )CB  = ( PFCF M=F B , LR ECL =80  , BLKS  I ZE=b480  ) 
//CHSTROA  On  |)SN=SRPCTR  AN, 0 1 SP = ( N E W , PA S S ) , UN  I T = 33 3 0, 

//  DCP=(RFCFM=FB,LRECL=120, 3LKS I Z E= 648 0 ) , S P ACf= ( CYL , ( 6 , II, RISE ) 

/ / 0 D C 0 / f x EC  PGM  = DG5  O OD , CONO= ( / » LF  ) »KCGI0N=146K» 

//  PARV=»  DALLAS  TRANSIT  • 

//StFPlI B nn  n SN=£ acnt . . l j AD, o IS P=SHR,VOL=( PRIVATE, RETAIN ) 

//sysudump  nn  sysout=a 

//pn TNT 01  DD  SYSOUT  = A,  )CB  = ( RFCF4=FB,LPECL=  133, BLKSIZF=  1330) 

//ITPAN01  Dn  DSN  = CACNT2. . 4.T  RANH l ST (0) , D I S P=  OL  D,  UN  IT  =<  2430, .DEFER ) 
//ITRAN05  DD  DSN=  f.RPCTR  AN  , 01  >P  = ( ULO,  PASS  ) 

//□TP  AN06  00  DSN=CACNT2.  . 4 .T  UNH  l ST  ( ♦ 1 ) , 0 I SP  = ( NEW  ,C  A TLG , DELE  TE  ) , 

//  L A3  EL  = ( ,SL),UNIT=(2413,,QE<=ER), 

//  0Cn-=(RnCFM=FR,LRECL  = t20, 3LK SI  Z F= 1 80 00 ) 


FIGURE  5.3-2 
DTS  PROCEDURE  RPCU05 
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//*  r.Tl.=  OALLAS  TRANSIT  »JP\TF=73^05 
/ / r? '■* C *■'  X T PROC  AC  NT  = ' CN 1 5 1 3 . S W « BC.  NT  = 'CN1510.RPC* 

/ / -'  P C F X T FXFC  Pj'*  =R  F HOB  » 1 0’J=60K  , COND  = ( 7f  L F ) 

//STCPLIP  OP  OSN=£ ACNT . . L 3AO,  ) I S P= SHR , VOL= PR  I V ATF 
/ / S Y 3n UT  DD  SYSOUT=A 

//sysuoijmp  no  sysout=a 

/ / I M f r P.  0 1 on  nSM  = F AC  NT  ..M.YE-if  CL  E ( 0 ) , DI SP=OLD , VOL=PR  IVATE 
//fJMCTPnp  OP  PSN=f.8IJSLST  , >1  S J = ( NEW,  PASS)  , 

//  lINrT  = T^30,S,5ArE=  (TPK,  ( l(  ),20),RLSn, 

//  OCP=  (IPFCL  = 18  ,BL<S  I ZE  = i<V9d  ,P  ECF  M=FP  ) 

//n?'?MT'H  00  SYS:H)T=A,DCB  = ( L <ECL  = 133  , BLKSI  ZE=133,PECFM=F) 

//PMT^OA  OD  DSN=  (IRCNT  . . S . 0 A T 5F I L F , 0 I S P=  OLO , VOL=  P R I V AT  E , DCB  = BUFNJ=  1 
/ / T C A R PQ3  on  ODNA“'E  = OAT  ECO 


FIGURE  5.3-3 

DTS PROCEDURE  RPCEXT 
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//*  r TL  = r>ALL4S  T R ANS I T , J TATE  = 73305 

//RPCR40  PR nc  ACNT  = ‘ CNl 513. 3RV' , DS<= 'TMDISK • , AC NT  2=  *CN 15 10. RPC • , 

//  VFP.  5='^' 

/ / R P r 4 0 c X PC  PCM  = Cl  ASSBOjRF  i I QN= l 46K , CO ND=(  7,  LE  ) 

//ST^PLIB  in  0SM  = 6ACNT  . . L 1 M)  , OISP  = 1LD,  VGL=PR  IVATE 
//SYSUOU^P  on  S Y SPLIT  = A 

//CMTPLOl  on  OSN=. "CLASS  , 0 I S P = HLD , UM  I T=2  3 14,V0L=(  3R I V ATE  , SER=EDSK.  ) 
//P*  TMT02  00  SYSDUT=A,  DC  8 = ( R ECF R = F 3 , LRECL=133,  BLKS I Z E= l 330 ) 

//  r tr  A\m  on  psn  = cacnt2. . i.t  < a nihi  s t ( c vers,  j ,di  sp=ulo , unit =2400, 

//  DC  8 =Q  UP  Nu=  L 

/ / D T R A AJ  0 4 00  OSn  = f.  LABOR  *01  3 P = ( JEW  « PASS  ) « UNIT  = 333")  » 

//  SPA'T=CYt  f (6»  1)  ) *DC3=(DFCF  1=FF,,LRECL  = 30»bLKSIZE  =64 BO  ) 

//CMTPL05  O0  nCO=CACOT2. .S.OATFFILF, O I SP  = 0L0 , VOL  = PR  I V AT E f DC B = 3 UF M J= 1 
//SYS  OUT  on  SY  SPLIT  = A 

/ / R PC  42  FXFC  PGM=  UY20JO, RF SI  JM=100K ,C3M0=( 5»LE ) 

//StpuLtp,  n[)  OSU=&ACNT..LTAO,DISP=  PL 0 , VOL  = PK I V ATE 
//SYS UOI.JMP  DO  SYSOlJT  = A 

//ITRAM01  00  DSM=CLAeOR,OISP=(  DL  ),  JELFTE  ) 

// 35  INTO?  00  SYSGUT=A , DC  8 = ( RECFR=F3, LR EC L= 1 3 3 , BL K S I Z E= 1 3 30 ) 

//TNITRL'B  00  OSN  = mCNITRL  ,0[j,;>=  1L0,  UMI  T=2  314,VCL  =(  PRIVATE »SFR=£DSK.  ) 

//  T M S T R04  00  DUMMY, DC E=  ( R ECF M= F , LR EC L= 5000»  ELK  SI  ZE=  6 000  ) 

//MSTR05  00  PUY,YY,DCB  = ( RECFM  = F , ELKS  I ZE  = 3 0) 

/ / 0 A T F 0 6 no  QS^I  = E AC MT  2 . • 3 . DAT  EF  I LE  , 0 I SP  = OLD  , VOL  = PR  I VAT  E 
//SYSOUT  00  SYSOUT=A 


FIGURE  5.3-4 
DTS PROCEDURE  RPCR40 
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//*  C TL  = OA  LI  A S TP  ANSI T , JO ATF =73305 

//RPCCPI  PRUT.  ACNT='CN1510.SRV  , 6CNT= • C N 1 744 . I N V ' , 
//  '-'-\ir= 'CMblO.PPC’  ,VFKS=‘  )•  . 

//■^-r'l  Pxrc  P3N=RE200O,REGlON=146K,COND=(7,LE) 

/ / S r P PI  IT  IJD  nSN=£ACNT. .LOAO, 01 SP=SHR,VOL=PRIVATF 
//  00  OSN=PPSQRT,DISP=S  HR 

//SVSritiT  DO  S Y S 0 U T = A 
//SYS'niiMP  nn  SYSOUT  = A 


//c  i->Ti-;k  31  3D  UNIT=SYSDA,SP4C5=(CYL,{6,  l),,CONTIG) 

/ / S j •’  t w < 1 ? 10  UN  I T=  S YSD  A,Sp4CE=(CYL,(G*l), » COM  I G) 

//SORT'/KOT  nn  IJNIT=SYSDA,SPACE=(CYL,(6,  1),,CCNTIG) 

/ / SnP  T1  I ra  DD  OSN  = PSPTL 18,  )ISP=SHR 

/ / + < 0 1 DO  DSN=&ISORT,  iJNI  T=  3330, 01  SP=  ( NEW,  DELETE)  , 

n SPAfP= ( CYL , ( 5,  l ) , , CGNT IG  ), 

//  DC  3= ( RECF  1 =^3 , LR ECL= 1 8 * RLK  S I ZF  =6498 ) 

/ / WK  0 2 no  OSN=&nSt)RTt  HIT  = 3330,0ISP=(NEW,  DELETE)  , 

U SPACE=(  CYL  , ( 5,  II  , ,CGNT  IG  I, 

//  0C3=(RFCFN=F3fLRECl=l8,RLKSIZE=6498» 

/ / P^S  T 9Q  l pn  0SN=F.8USLST  , 7 I Sp  = ( OLD , PA SS ) 

//T  TUA-100  nn  DSN=  £ BCNT  . . M . T R ANT  AP  E ( 0 ) , D I S P=  OL D ,UN  IT  = 2400 , DC3  = 6 UF  !\I0=  1 
//PTRAN|->4  on  DSN  = EPTCOST , )ISP  = (NEW, PASS) , UNI T=3330, 

//  DC  P= (RFC.FM=FS,LRECL  = 13,  RLKS I ZE  = 64  9 8 ) * 

//  SPAC.  p=  (TRK  ,(  100,20  ),  RLSE  ) 


//snr.F  'T  F x FC  PCN=RF303D,REGI JN=146K,CDND=(7,LEI 

//STPPLIR  00  OSN  = £ACNT. .L  J40,  )ISP  = SHR,VUL  = PRIVATE 

//  30  DSN=PPSORT,DISP=SHR 

//SYSOIJT  00  SYS  OUT  = A 

//SYSUniJMP  no  SYS3UT  = A 

//S39TLT8  DD  0 SNI  = P SP  T L 1 3 , 0 I S p=  SHR 


//SnPTw<01 
//S09TWK32 
l/S  .19  TWK  33 
//W<01 
// 

// 

/ / WK  0 9 
// 

// 


00  !J'4IT=SYS'OA,SPACE=(CYL,(6,  1 ) ,,  CONTI  G) 
on  UNIT=SYSD4,S?ACE= (CYL , (6, 1),, CONTI G) 

00  UNIT=SYSOA,S°AC:=(CYLf (6, I ) ,, CONTI G) 
on  DSN=GISnRT,lfNIT=3330,DISP=  (NEW, DELETE) , 
SPACE=(CYL,(6,1  l , tCONTIG), 
DCR=(RECFM=F3, LRECL=18,BLKSIZE=6498 ) 

0 3 OSN=£nSORT , UNI T= 3330, QI SP=  (NEW,  DELETE  ) , 
SPACE=(CYL,(S,1) ,,CCNTIG), 
DCR=(PECEM=P8,LR:CL=18,PLKSIZE=6438) 


/ / P'ASTPOl  nn  DSN=f.BUSLST  , 3IS9=(nLn,PASS) 

/ / r L A BP  0 5 no  nSN  = GCCNT..  1-1.TR  ANTI  ST  (£  VERS  . ) , 0 1 S P=GLD , UN  IT=  240  0 , 
//  0".R  = RUFNU=I 

//PL4RR06  00  OSN  = £ LRC OST , 01 S °= C N E W , P AS S ) , UN I T = 33 30 , 

//  DCR=(RECFN=FR,LRECL=18,SLKSI  ZE=6498  ) , 

//  SPAC.R=(TRK,(  1 00 , 20  ) , RL SE  I 


FIGURE  5.3-5 
DTS  PROCEDURE  RPCEPL 
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//*  r T L=  0 ALL  AS  TRANSIT, J0ATE=/n05 
//P.PCR45  PROC  ACNT  = ' CN1  5 1 ) . SRV ' 

//RRC.R45  CXEC  PGM  = RP')8DD,REGlU  4=  146K«C0ND=(7.LEI  , 

//  PARM=*  DALLAS  T ’l  ^ >4  S I T • 

//STDPLIP  OD  DSN  = £ AC NT  * * L14L)»DISP=SHP,VnL=  PRIVATE 

//  no  dsn=ppsort,disr=sh< 

//cqoTLIP  DO  DSN=PSRTL [3,DIS J=SHP 

//Sr>T^K^l  HD  UNIT=SYSDA,SPACE=(CYL,(3,U ,«CCNTTG) 

//S^>TWX02  DD  UNIT=SYSOA,SPACE  = (CYL,( 3 , l I , ,CONTI G ) 

//SDRTWK03  no  UM T=SYSDA, SP4G==(CYL» ( 3,1 ) , tCONTIG) 

//SYSOIJT  DD  OUM'AY 

/ / K D l DD  DSN=£SJRT,UNIT=3?3 ),  DISP=(  NEW,  DELETE), 

//  SPACF  = <CYL,(  S , 1 I , ,C  JNTI  i J , DC  6 = <RECFM*FB,  LP  ECL  = 97,  RLKS  IZE=t>49  9 ) 
//■KV  DH  DSN  = tc'EPnRT  ,'JNI  T = 3 3 3 ) , D I SP=(  NEW, DELETE)  , 

//  SPACF=(CYL,  (5 ,1 ) , , CT4TIGI  t DC B= ( R ECFM = FB, LR ECL =97 , BLK S IZ E=6499 ) 
//P9STRQ2  DD  DSN=r.RUSLST,3ISP=(QLD,PASS)  ,DCB=HUFND=l 
//PLA3R06  DD  DSN= CL BCD S T , D I S ( )LD , P A SS ) 

//PTRAN04  DO  DSN  = C PT  COST , DISJ=(OLO*PASS) 

//npPNTDl  DD  S YSD UT  = A , DC R= ( R = CF A =F R , LR EC L= 133  * BL KS I Z E=1 3 3D  I 
//SYS UPljMP  DD  SYS^UT=A 


FIGURE  5.3-6 
DTS  PROCEDURE  RPCR46 
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//*  CTL  = OALLAS  TRANSIT  ,JDATE=73305 
//^PCWS^  PPOC  ACNT= • CN1  51  ). SRV* 

/ / u.  P C R 5 0 PXFC  PG3=RPDB0D,  R EG  I JN=146K,rOND=(  7 » L E ) , 

//  PARM=t  DALLAS  TRANSIT  - LAdOP  ONLY  • 

// $T  EPL  I q DD  P SN  = £ AC  NT.. U1  AD,  >)ISP  = SHR,VOL  = PRIVATE 
//  PH  DSN=PPSORT,DISP=SNR 

//S^RTLIR  DD  PSN=P5RTL I3,DlSq=SHR 

//SDPTWKOl  no  UN  IT  = SYSDA,  SPACEMCYL,  ( 3,1 ) , .CONTIG) 

//SDRTWK02  nP  UNI T=SYSDA,S?ACE=(CYL, < 3, 1 ) , .CONTI G ) 

//SDRTtfl0  3 DD  UN  I T=SYSDA  , SPACE  = (CYL  , ( 3 , 1 ) , .CONTIG ) 

//SYSPUT  no  DUMNY 

/ / WK 0 1 DD  DSN=£S0RT,UNIT=3330,QISP=(NEW, DELETE), 

//  SPACF= (CYL, ( S, 1) , .C3NTIG) , DCB=(RECFM=FB, LRECL=97 ,BLKS IZE=6^99 ) 
//W<02  DD  DSN=£REr>DRT  , UN  I T - 3 J3J, PI SP= (NEW, DELETE), 

//  SDACc=(CYL,(S,l),,C0NTIG),DCR=(RECFM=FB,LRECL=97,BLKSIZE=6^99) 
//d«STRD?  no  DSN=F.B')SLST,DISP=(DLD,PASS) 

//PLARR06  DD  DSN  = £ LqC  OS  T , D I S q=  ( OL  D , P A SS  ) 

//PTRANDA  DD  DU*HY,OCB  = {RECpN=F,BLKSIZE=19) 

//PPRMTOl  Dn  SYSDUT=A,DCB=(R£CFM=FB,LRECL=133,BLKSIZE=L330) 
//SYSUDUMP  DP  SYSOUT=A 


FIGURE  5.3-7 
DTS  PROCEDURE  RPCR50 
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//*  C T L = 0 A L L A S TRANS!  T ,JDATE=733D5 
//PP'~R55  PROC  ACNT='CN151  D. 

/ / 3 r>  CR55  rXRC  PGM  = R P0300 , R 6 3 I )N  = 1 A 6 K , CONO=  ( 7 , L E ) , 

//  P A R M = ' DALLAS  TRANSIT  - PARTS  ONLY  • 

//STRPLIR  00  DSN=E4CNT..L0AD,  DISP=SHP,,VOL=PRIVATE 
//  f)0  DSN=PPSORT,DISP=S  HR 

//S0RTWKR1  PD  UNIT=SYSDA,SPACE=(CYL,( 3,1) ,,C0NTIG) 

/ / Sr'R  TWK  0?  00  UNIT=SYSDA,SPACS=(CYL,(3,L),,C0NTIG) 

/ / $PR  TWK  03  00  UNI T=SYSOA,SPACi  = (CYL, (3,1 ) ,, CON TIG) 

//SORTLIR  00  DSN  = PSRTL 13 ,01 S J -SHR 
//SYSOUT  00  DUMMY 

/ / WK  0 1 00  DSN=ESdRT, UNI T = 333  ),JISP  = < NEW, DELETE  ) , 

//  SPAT  f=  (C.YL,  ( 6,  l ) , , CONTIS  ) , DC  B=  (RECFM=F3,  LRECL=97  , BLK  S I Zp  = b49  9 ) 
/ / R < 0 ? on  US  N=&REPfJRT,UNIT=333)»DISP=(NEW»  DELETE), 

//  SPA  C.r=(CYL,(  6,1),,  CONTIS),  DC  B=(RECFM=FB,LRECL  = 97,RLKS  IZE=6499  ) 
// P^S  T °02  no  DSN=&BUSLST  , DISP=( OLD, PASS) 

Y/ PL  A BP.  06  00  DUMMY  , DC  9={  RtCF  i = F,  BLKS  I ZE=  19  ) 

/ / P T R A N n 4,  00  DSN=&PTCOST  , 01  SP  = ( OLD,  PASS  ) 

/ / OP  ROT  0 1 00  SYSOUT=A,OC3=(R6CFM  = FB,LRECL=133, BLKSI Z E= 1 33 0 ) 
//SYSUDUMD  00  SYSOUT  = A 


FIGURE  5.3-8 
DTS PROCEDURE  RPCR55 
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6.0  REPAIR  COST  SYSTEM  FILES 


The  major  files  used  in  the  Repair  Cost  System  are  listed  in  Table 

6.0- 1.  Their  relationship  in  terms  of  processing  is  shown  in  Figures 

6.0- 1  and  6.0-2.  The  former  illustrates  the  system  as  implemented  at 
AC  Transit  District  (ACTD) ; the  latter  illustrates  the  system  as  im- 
plemented at  Dallas  Transit  System  (DTS). 

Each  file  is  described  in  a File  Specification  Sheet  and  in  Record 
Specification  Sheets.  The  File  Specification  Sheet  contains: 

(a)  File  Name:  This  is  the  common  user  name  for  the  file. 

(b)  Data  Set  Name:  This  is  the  name  used  to  reference  the 
file  in  JCL  commands. 

(c)  Number  of  Formats:  The  number  of  record  types  in  the  file. 

(d)  Record  Size:  The  number  of  characters  in  a record  of  any 

type  in  the  file. 

(e)  Record  Formats:  Each  record  in  the  file  is  referenced  by 

format  or  transaction  code,  where  appropriate,  and  the  record 
name.  The  maximum  and  minimum  number  of  each  type  of  record 
in  the  file  is  shown,  when  appropriate. 

(f)  Program  Use:  Each  program  that  uses  the  file  is  identified 

by  name  and  number.  The  use  of  the  file,  as  input  and/or 
output,  and  the  COBOL  name  by  which  the  file  is  referenced 
in  each  program  are  described. 

The  Record  Specification  Sheet  contains: 

(a)  Record  Name:  This  is  the  common  user  name  for  the  record. 

(b)  File  Name:  This  is  the  common  user  name  for  the  file  that 

contains  the  record.  It  is  provided  as  a cross-reference. 

(c)  COBOL  Name  of  Record:  This  is  the  name  given  to  the  structure 

used  to  define  the  record. 
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(d)  Record  Format  Code:  This  is  the  format  or  transaction  code 

by  which  each  type  of  record  is  referenced. 

(e)  Record  Length:  This  is  the  number  of  characters  in  the 

record. 

(f)  A description  of  each  data  item  in  the  record  in  terms  of: 

(1)  initial  character  position  of  the  field  containing 
the  item. 

(2)  the  number  of  characters  in  the  field. 

(3)  the  type  of  characters  in  the  field  where: 

9 represents  digits 
A represents  alphabetic  characters 
X represents  alphanumerics 

(4)  the  COBOL  name  of  the  field. 

(5)  a description  of  the  data  item. 

Each  subsection,  as  specified  in  Table  6.0-1,  describes  a file. 

A brief  description  of  the  purpose  of  each  file  is  included. 
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TABLE  6.C-1 


SIMS  REPAIR  COST  SYSTEM  FILES 


Subsection 


Number 

File  Name 

Data  Set  Name 

Permanent 

Files: 

6.1 

Labor  Transaction  History  File 

CN1510 . RPC.M. TRANHIST ( ) 

6.2 

Inventory  Transaction  History  File 

CN 1 7 4 4 . IN V . M . THANT A? E ( 0 ) 

6.3 

Vehicle  Master  File 

CN1510.SRV.M. VEHICLE (0) 

6.4 

ACTD  Labor  Transaction  File 

AC. TIME. CARDS 

6.5 

DTS  Labor  Transaction  File 

DTS. TIME. CARDS 

6 . 6 

Employee  Master  File 

CN1510 . RPC . S . EMPFILE 

6.  7 

DTS  Employee  Card  File 

EMPLCD 

6.8 

Maintenance  Report  Generator 
Control  File 

MCNTRL 

6.9 

Maintenance  Report  Classification 
File 

MCLASS 

6.10 

Report  Request  File 

CN1510 . RPC . S . DATEFIL7 

6.11 

Date  Card  File 

DATE CD 

Temporary 

Files : 

6.12 

Temporary  Labor  Transaction  File 

&RPCTRAN 

6.13 

Labor  Hours  Extract  File 

&LAB0R 

6.14 

Labor  Cost  Extract  File 

&LBC0ST 

6.15 

Materials  Cost  Extract  File 

&PTC0ST 

6.16 

Vehicle  Extract  File 

&BUSLST 
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TIME.  r ~ "H  DA500 
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FIGURE  6.0  1 

ACTD  REPAIR  COST  SYSTEM  FLOWCHART 


DTS.  \ CN1510. 

TIME.  V— ► DA500  4 RPC  4 EMP100  4 EMPLCD 

CARDS  / S . EMPFILE  
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FIGURE  6.0  2 

DTS  REPAIR  COST  SYSTEM  FLOWCHART 


6. i Labor  Transaction  History  File  (CN1510.RPC.M.TRANHIST(  )) 


The  Labor  Transaction  History  File  is  a magnetic  tape  file,  and 
is  the  basic  file  of  the  SIMS  Repair  Cost  System.  It  contains  records, 
by  maintenance  employee  number,  of  the  distribution  of  work  time  accord- 
ing to  task  performed. 

The  Labor  Transaction  History  File  is  a generation  data  set.  Three 
versions  are  cataloged  on  disk  at  all  times.  The  versions  represent 
the  result  of  the  three  most  recent  system  executions. 

File  and  record  specifications  are  given  in  Tables  6.1-1  and  6.1-2. 
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TABLE  6.1-1 


R/C  SYSTEM  FILE  SPECIFICATION 

FILE  NAME:  Labor  Transaction  History  File 

DATA  SET  NAME;  CN1510. RPC.M. TRANHIST ( ) 

NUMBER  OF  RECORD  FORMATS:  1 RECORD  SIZE:  120  Characters 

FILE  ORGANIZATION:  Records  are  sequenced  by  processing  date 

RECORD  FORMATS 


FORMAT 

CODE 

RECORD  NAME 

MAX.  NO. 

MIN.  NO. 

_ 

Labor  Distibution  Record 

U 

1 

PROGRAM 

PROGRAM 

IDENT. 

USE 

PROGRAM  NAME 

I/O 

PROGRAM  COBOL 
NAME  FOR  FILE 

DG500 

Labor  Transaction  History 

R 

INPUT-TRAN-HIST 

DG500 

File  Edit/Update 
Labor  Transaction  History 

W 

OUTPUT-TRAN-HIST 

CLASSM 

Edit/Update 

Maintenance  Report  Extract 

R 

INPUT-FILE 

RE  300 

Labor  Cost  File  Extract 

R 

ILABR-FILE 
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TABLE  6.1-2 


RECORD  SPECIFICATION 
RECORD  NAME:  Labor  Distribution  Record 

FILE  NAME:  Labor  Transaction  History  File 

COBOL  NANE  OF  RECORD:  LABOR-COST-INPUT-RECORD 

RECORD  LENGTH:  120  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

6 

9(6) 

LC-PROCESS-DATE 

Processing  Date  (YYMMDD) 

7 

6 

9(6) 

LC-KEY-DATE 

Transaction  Date  (YYMMDD) 

13 

4 

9(4) 

LC-KEY-EMP-NBR 

Employee  Number 

17 

2 

XX 

LC- IN-DAY 

Transaction  Day 

19 

1 

X 

LC-IN-NEG-CODE 

Transaction  Correction 
Code 

20 

27 

X(27) 

FILLER 

47 

1 

X 

LC-IN-SHIFT 

Shift  Worked 

48 

4 

S99V99 

LC- IN-RE G-HOURS 

Regular  Hours 

52 

4 

S99V99 

L C- IN-P  REM-KOURS 

Premium  Hours 

56 

2 

XX 

LC-IN-VEH-GRP-CODE 

Group  Code 

58 

2 

XX 

LC- IN-UNIT-CODE 

Unit  Code 

60 

2 

XX 

LC-IN-ORG-CODE 

Organization  Code 

62 

2 

XX 

FILLER 

64 

2 

XX 

LC-IN-TYPE-REASON 

Work  Type-Reason  Code 

66 

4 

X(4) 

LC- IN-EMPLOYEE-CODE 

Employee  Number 

70 

4 

9V999 

LC-IN-HOURLY-RATE 

Hourly  Pay  Rate 

74 

1 

X 

LC-IN-WO-CONTROL 

Work  Order  Control 

75 

4 

X(4) 

LC-IN-WO-NBR 

Work  Order  Number 

79 

4 

X(4) 

LC-IN-ACCT 

Account  Number 

83 

2 

XX 

LC-IN-SUB-ACCT 

Sub-Account  Number 

35 

1 

X 

LC-IN-USER-DIV 

Division  Code 

86 

4 

X(4) 

LC-IN-VEH-NBR 

Vehicle  Number 

90 

1 

X 

LC- IN-FLEET-CODE 

Fleet  Code 

91 

6 

X(6) 

LC- IN-DATE 

Transaction  Date  (MMDDYY) 

97 

24 

X(24) 

FILLER 

TOTAL  120 
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6. 2 Inventory  Transaction  History  File  (CN1744. INV.M.TRANTAPE(  )) 


The  Inventory  Transaction  History  File  is  one  of  the  major  files 
of  the  SIMS  Inventory  System.  It  is  a tape  file,  containing  the  per- 
manent history  of  transactions  entered  in  the  Inventory  System.  This 
file  is  a generation  data  set.  Repair  Cost  System  procedures  call 
for  the  current  generation,  version  0,  during  system  execution. 

The  Inventory  Transaction  History  File  is  described  in  Table  6.2-1. 
The  file  contains  23  types  of  records.  These  records  are  defined  by 
11  formats.  Record  Formats  are  referenced  by  two  codes.  The  alpha- 
betic codes  are  transaction  codes  included  in  the  original  input  record. 
The  numeric  codes  represent  part  of  the  sort  key  added  to  the  record 
during  processing. 

Only  two  types  of  record  is  used  by  the  Repair  Cost  System.  The 
materials  issue  and  the  return-to-stores  records  are  used  to  compute 
the  cost  of  parts  issued  for  the  maintenance  of  revenue  vehicles.  The 
specifications  of  these  record  types,  as  defined  for  the  Repair  Cost 
System,  are  described  in  Table  6.2-2.  The  specifications  of  these 
record  types,  as  defined  for  the  Inventory  System,  and  of  the  other 
record  types,  are  described  in  the  documentation  of  the  Inventory 
System. 


TABLE  6.2-1 


R/C  SYSTEM  FILE  SPECIFICATION 

FILE  NAME:  Inventory  Transaction  History  File 

DATA  SET  NAME:  CN1744. INV.M. TRANTAPE ( ) 

NUMBER  OF  RECORD  FORMATS:  11  RECORD  SIZE:  127  Characters 


FILE  ORGANIZATION:  Records  are  sequenced  by:  Processing  Date 

Part  Number 

Transaction  Date 
Transaction  Code 


RECORD  FORMATS 


FORMAT 

CODE  RECORD  NAME 


MAX.  NO.  MIN.  NO. 

PER  PART  PER  PART 


AA,AX  (01,02)  Item  Characteristics  Record  U 

BA  (03)  Item  Description  Record  U 

BA,DX  (07,08)  Division  Stock  Record  U 

EA  (09)  Average  Unit  Price  Change  U 

Record 

0A,0N  (12,13)  Purchase  Order  Record  U 

2A,2N  (15,16) 

3A,3N  (17,18) 

Quantity  Adjustment  Record  U 

4A,4N  (19,20) 

6A,6N  (21,22)  Materials  Receipt  Record  U 

7A,7N  (23,24)  Vendor  Return  Record  U 

8A,8N  (26,14)  Materials  Issue  Record  U 

9A,9N  (27,28)  Value  Adjustment  Record  U 

RS  (29)  Reorder  Suspense  Record  U 


1 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 


PROGRAM  USE 


PROGRAM 

IDENT.  PROGRAM  NAME 


PROGRAM  COBOL 
I/O  NAME  FOR  FILE 


RE200  Materials  Cost  File  Extract  R 


ITRAN-FILE 
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TABLE  6.2-2 


RECORD  SPECIFICATION 

RECORD  NAME:  Materials  Issue  Record  (Return-to-Stores  Record) 

FILE  NAME:  Inventory  Transaction 'History  File 

COBOL  NAME  OF  RECORD:  ITRAN-RECORD 


RECORD 

FORMAT 

CODE: 

8A,  1A,  (26 , 14) 

RECORD 

LENGTH: 

127 

Characters 

FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

6 

X(6) 

PROCESS-DATE 

Inventory  System  Pro' 

cessing  Date 

7 

2 

XX 

CLASS-CODE 

Inventory  Class  Code 

9 

9 

X(9) 

FILLER 

18 

6 

X(6) 

TRANS-DATE 

Transaction  Date 

24 

2 

XX 

TRANS-CODE 

Transaction  Code 

26 

21 

X(21) 

FILLER 

47 

7 

9 (5) V99 

ISSUE D-QTY 

Quantity  Issued 

54 

35 

X(35) 

FILLER 

89 

4 

X(4) 

WORK-ORDER 

Work  Order  Number 

93 

6 

X(6) 

ACCT-NO 

Account  Number 

99 

1 

X 

FILLER 

100 

4 

X(4) 

VEH-NO 

Vehicle  Number 

104 

1 

X 

FLEET-CODE 

Fleet  Code 

105 

15 

X(15) 

FILLER 

120 

8 

S9 (4) V9 (4) 

UNIT-PRICE 

Unit  Price 

TOTAL 

127 
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6.3  Vehicle  Master  File  (CN1510. SRV.M. VEHICLE ( )) 


The  Vehicle  Master  File  is  the  basic  file  of  the  SIMS  Service/Unit 
Change  System.  It  is  a disk  file,  containing  a set  of  records  for  each 
vehicle  in  the  system.  These  records  are  of  mileage  traveled,  vehicle 
servicing,  and  maintenance  performed.  The  file  is  a generation  data  set. 
Repair  Cost  System  Procedures  call  for  the  most  current  generation, 
version  0,  during  system  execution. 

The  Vehicle  Master  File  is  described  in  Table  6.3-1.  The  file 
contains  11  types  of  records.  Only  two  types  of  record  are  used  by  the 

Repair  Cost  System.  The  vehicle  header  records  are  used  to  identify 
each  vehicle  and  the  monthly  summary  records  are  the  source  of  mileage 
traveled.  The  specifications  of  the  Vehicle  Header  Record  and  the 
Monthly  Summary  Record,  as  defined  for  the  Repair  Cost  System,  are 
described  in  Tables  6.3-2  and  6.3-3.  The  specifications  of  these 
records,  as  defined  for  the  Service/Unit  Change  System,  and  of  the 

other  record  types  are  described  in  the  documentation  of  the  Service/ 
Unit  Change  System. 
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TABLE  6.3-1 


R/C  SYSTEM  FILE  SPECIFICATION 


FILE  NAME;  Vehicle  Master  File 


DATA  SET  NAME:  CN15 10 . SRV.M. VEHICLE ( ) 

NUMBER  OF  RECORD  FORMATS:  11  RECORD 

SIZE: 

30  Characters 

FILE  ORGANIZATION:  Records  are  sequenced  by:  Bus  Number 

Record  Format  Code 
Record  Date 

RECORD  FORMATS 

FORMAT 

CODE 

RECORD  NAME 

MAX. 

NO.  MIN.  NO. 

20 

Header  Record 

1 

1 

21 

Accumulated  Miles  Record 

1 

1 

24 

Daily  Record 

80 

0 

26 

Monthly  Summary  Record 

7 

0 

27 

Monthly  Commodity  Cost  Record 

7 

0 

29 

Inspection  Record 

1 

0 

31 

Unit  Change  Cost 

50 

0 

34 

Engine  Rering  Record 

1 

0 

35 

Engine  Overhaul  Record 

1 

0 

38 

Brake  Mileage  Record 

1 

0 

39 

PROGRAM 

PROGRAM 

Brake  Drum  Record 

USE 

1 

0 

PROGRAM  COBOL 

IDENT. 

PROGRAM  NAME 

I/O 

NAME  FOR  FILE 

RE100 

Vehicle  File  Extract 

R 

IMSTR-FILE 
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TABLE  6.3-2 


RECORD  SPECIFICATION 


RECORD  NAME:  Header  Record 

FILE  NAME:  Vehicle  Master  File 

COBOL  NAME  OF  RECORD:  I-VEH-HDR 

RECORD  FORMAT  CODE:  20 


RECORD  LENGTH:  30  Characters 

FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

1 

2 

99 

I-VEH-FORMAT 

3 

4 

X(4) 

I-VEH-NO 

7 

6 

9(6) 

I-VEH-DATE 

13 

2 

XX 

I-VEH-FLEET-NBR 

15 

4 

X(4) 

FILLER 

19 

2 

XX 

I-ASSIGNMENT 

21 

6 

9(6) 

I - AS  S I GNMENT  -DATE 

27 

2 

XX 

I-PRIOR 

29 

2 

XX 

FILLER 

TOTAL  30 


FIELD  DESCRIPTION 

Record  Format  Code 
Bus  Number 
Date  of  Record 
Fleet  Code 

Division  Assignment 
Division  Assignment  Date 
Prior  Division  Assignmen 
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TABLE  6.3-3 


RECORD  SPECIFICATION 


RECORD  NAME:  Monthly  Summary  Record 

FILE  NAME;  Vehicle  Master  File 
COBOL  NAME  OF  RECORD:  26 


RECORD  LENGTH:  30  Characters 

FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

12 

X(12) 

FILLER 

13 

5 

S9(5) 

I-MILES-MTD 

Monthly  Miles 

18 

5 

S9(4)V9 

I-FUEL-MTD 

Monthly  Fuel 

23 

4 

S9(3)V9 

I-OIL-MTD 

Monthly  Oil 

27 

3 

S9  (3) 

I-COOL-MTD 

Monthly  Coolant 

30 

1 

X 

FILLER 

TOTAL  30 
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6 . 4 ACTD  Labor  Transaction  File  (AC. TIME. CARDS) 


The  ACTD  Labor  Transaction  file  is  a file  of  80-character  records. 
The  records  may  be  in  the  form  of  cards  or  of  card  images  on  magnetic 
tape.  The  format  of  the  records  is  specific  to  ACTD. 

The  file  contains  records  of  maintenance  work  performed.  Each 
record  identifies  in  detail  the  nature  of  the  work  performed,  the 
employee  performing  the  work,  and  the  hours  charged.  The  record  also 
contains  the  hourly  pay  rate  of  the  employee. 

File  and  record  specifications  are  described  in  Tables  6.4-1  and 
6.4-2. 
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TABLE  6.4-1 


R/C  SYSTEM  FILE  SPECIFICATION 

FILE  NAME:  ACTD  Labor  Transaction  File 

DATA  SET  NAME:  AC. TIME. CARLS 

NUMBER  OF  RECORD  FORMATS:  1 RECORD  SIZE:  80  Characters 

FILE  ORGANIZATION:  Random  Order 

RECORD  FORMATS 

FORMAT 


CODE 

RECORD  NAME 

MAX.  NO. 

MIN.  NO. 

PROGRAM 

PROGRAM 

ACTD  Labor  Distribution  Record 

USE 

U 

1 

PROGRAM  COBOL 

IDENT . 

PROGRAM  NAME 

I/O 

NAME  FOR  FILE 

DA500A 

Data  Acceptance- ACTD 

R 

INPUT-TIME-CARD 
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TABLE  6.4-2 


RECORD  SPECIFICATION 


RECORD  NAME:  ACTD  Labor  Distribution  Record 

FILE  NAME:  ACTD  Labor  Transaction  File 

COBOL  NAME  OF  RECORD:  CR-DIST-CARD 

RECORD  FORMAT  CODE:  None 


RECORD  LENGTH:  80  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

CR-TR-DAY-MO 

Day  of  Month  of  Trans- 
action 

3 

1 

X 

CR-TR-NEG-CODE 

Transaction  Modifier 
Code 

4 

6 

X(6) 

FILLER 

10 

1 

X 

CR-TR-TIME-CARD 

Time  Card  Indicator 
(= 

11 

20 

X(20) 

FILLER 

31 

1 

X 

CR-TR-SHIFT 

Shift  Worked 

32 

4 

99V99 

CR-TR-REG-HOURS 

Regular  Hours  Worked 

36 

4 

99V99 

CR-TR-PREM-HOURS 

Premium  Hours  Worked 

40 

2 

XX 

CR-TR-VEH-CODE 

Group  Code 

42 

2 

XX 

CR-TR-UNIT-CODE 

Unit  Code 

44 

2 

XX 

CR-TR-ORG-CODE 

Organization  Code 

46 

2 

XX 

FILLER 

48 

1 

X 

CR-TR-WORK-TYPE 

Work  Type  Code 

49 

1 

X 

CR-TR-REASON-CODE 

Reason  Code 

50 

4 

X(4) 

CR-TR-EMP-NBR 

Employee  Number 

54 

4 

9V9 (3) 

CR-TR-PAY-RATE 

Hourly  Pay  Rate 

58 

1 

X 

CR-TR-WO-CONTRL 

Work  Order  Field  Indicator 

59 

4 

X<4) 

CR-TR-WO-NBR 

Work  Order  Number 

63 

4 

X(4) 

CR-TR-ACCT-NBR 

Account  Number 

67 

2 

XX 

CR-TR-SUB-ACCT 

Subaccount  Number 

69 

1 

X 

CR-TR-USER-DIV 

User  Division  Code 

70 

4 

X(4) 

CR-TR-VEH-NBR 

Vehicle  Number 

74 

1 

X 

CR-TR-FLEET-CODE 

Fleet  Code 

75 

6 

X(6) 

CR-TR-TRAN-DATE 

Transaction  Date  (MMDDYY) 

TOTAL  80 
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6. 5 DTS  Labor  Transaction  File  (DTS .TIME. CARDS) 


The  DTS  Labor  Transaction  File  is  a file  of  80-character  records. 
The  records  may  be  in  the  form  of  punched  cards  or  of  card-images  on 
magnetic  tape.  The  record  format  is  specific  to  DTS. 

The  file  contains  records  of  maintenance  work  performed.  Each 
record  identifies  in  detail  the  nature  of  the  work  performed,  the 
employee  performing  the  work,  and  the  hours  charged. 

File  and  record  specifications  are  described  in  Tables  6.5.1 
and  6.5.2. 
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TABLE  6.5-1 


R/C  SYSTEM  FILE  SPECIFICATION 

FILE  NAME:  DTS  Labor  Transaction  File 

DATA  SET  NAME:  DTS . TIME. CARDS 

NUMBER  OF  RECORD  FORMATS:  1 RECORD  SIZE:  80  Characters 

FILE  ORGANIZATION:  Random  Order 

RECORD  FORMATS 


FORMAT 

CODE 

RECORD  NAME 

MAX.  NO. 

MIN.  NO. 

DTS  Labor  Distribution  Record 

U 

1 

PROGRAM 

USE 

PROGRAM 

IDENT. 

PROGRAM  NAME 

I/O 

PROGRAM  COBOL 
NAME  FOR  FILE 

DA500D 

Data  Acceptance  - DTS 

R 

INPUT-TIME- CARD 
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TABLE  6.5-2 


RECORD  SPECIFICATION 


RECORD  NAME:  DTS  Labor  Distribution  Record 

FILE  NAME:  DTS  Labor  Transaction  File 

COBOL  NAME  OF  RECORD:  DTS-DIST-CARD 

RECORD  FORMAT  CODE;  None 
RECORD  LENGTH:  80  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

1 

4 

X(4) 

FILLER 

5 

1 

X 

ID-CODE-T 

6 

4 

X(4) 

DTS-EMP-NBR 

10 

3 

X(3) 

FILLER 

13 

3 

X(3) 

DTS-P AY-RATE 

16 

2 

XX 

DTS-BONUS-CODE 

18 

7 

X(7) 

FILLER 

25 

1 

X 

EXCP -PAY- CODE 

26 

4 

X(4) 

FILLER 

30 

4 

X(4) 

DTS-WO-NBR 

34 

4 

X(4) 

DTS-ACCT-NBR 

38 

4 

X(4) 

DTS-VEHt-NBR 

42 

2 

XX 

DTS-VEH-CODE 

44 

2 

XX 

DTS -UNIT-CODE 

46 

1 

X 

DTS -WORK-TYPE 

47 

1 

X 

DTS-REASON-CODE 

48 

12 

X(12) 

FILLER 

60 

2 

99 

DTS-REG-HRS 

62 

2 

99 

DTS-REG-MIN 

64 

1 

X 

FILLER 

65 

2 

99 

DTS-OVTIM-HRS 

67 

2 

99 

DTS-OVTIM-MIN 

69 

6 

9(6) 

DTS-TRAN-DATE 

75 

6 

X(6) 

FILLER 

TOTAL 

80 

FIELD  DESCRIPTION 


Transit  Identification 
Code  (=T) 

Employee  Number 

Exception  Hourly  Pay 
Rate 

Premium  Pay  Code 

Exception  Pay  Code  (*X) 

Work  Order  Number 
Account  Number 
Vehicle  Number 
Group  Code 
Unit  Code 
Work  Type  Code 
Reason  Code 

Regular  Hours  Worked 
Fractional  Regular  Hours 
(in  minutes) 

Overtime  Hours  Worked 
Fractional  Overtime 
Hours  (in  minutes) 
Transaction  Date  (MMDDYY) 
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6.6  Employee  Master  File  (CN1510 . RPC . S . EMPFILE) 


The  Employee  Master  File  is  a disk  file.  It  contains  one  record 
for  each  maintenance  employee,  specifying  employee  number  and  hourly 
pay  rate.  This  file  is  specific  to  DTS  and  is  used  in  the  conversion 
of  the  DTS  Labor  Transaction  File  to  a format  acceptable  to  the  Repair 
Cost  System. 

File  and  record  specifications  are  described  in  Tables  6.6-1  and 

6.6-2. 
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TABLE  6.6-1 


R/C  SYSTEM  FILE  SPECIFICATION 

FILE  NAME:  Employee  Master  File 

DATA  SET  NAME:  CN1510.RPC. S .EMPFILE 

NUMBER  OF  RECORD  FORMATS:  1 RECORD  SIZE:  18  Characters 

FILE  ORGANIZATION:  Records  are  sequenced  by  employee  number 

RECORD  FORMATS 


FORMAT 

CODE 

RECORD  NAME 

MAX.  NO. 

MIN.  NO. 

DTS  Employee  Record 

U 

1 

PROGRAM 

PROGRAM 

IDENT 

USE 

PROGRAM  NAME 

I/O 

PROGRAM  COBOL 
NAME  FOR  FILE 

EMP100 

DTS  Employee  File  Extract 

W 

ODISK-FILE 

DA500D 

Data  Acceptance  - DTS 

R 

DTS-PAY-FILE 
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TABLE  6.6-2 


RECORD  SPECIFICATION 


RECORD  NAME:  DTS  Employee  Record 

FILE  NAME:  Employee  Master  File 

COBOL  NAME  OF  RECORD:  OSORT-RECORD 

RECORD  FORMAT  CODE:  None 

RECORD  LENGTH:  18  Characters 


FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

4 

9(4) 

O-EMP-NO 

Employee  Number 

5 

2 

99 

O-ORG-CODE 

Organization  Code 

7 

4 

9V9 (3) 

O-PAY -RATE 

Hourly  Pay  Rate 

11 

8 

X(8) 

FILLER 

TOTAL 

18 

6. 7 DTS  Employee  Card  File  (EMPLCD) 


The  DTS  Employee  Card  File  is.  a set  of  80-cnaracter  records  in  the 
form  of  punched  cards.  The  record  contains  employee  information, 
including  hourly  pay  rate  and  identity  of  the  organizational  unit  to 
which  the  employee  is  assigned.  The  DTS  Employee  File  Extract  program 
(EMP100)  reads  this  file  and  extracts  data  from  the  records  for  main- 
tenance employees.  The  extracted  records  are  stored  in  the  Employee 
Master  File  (see  Section  6.6). 

File  and  record  specifications  are  provided  in  Tables  6.7-1  and 


6.7-2. 


TABLE  6.7-1 


R/C  SYSTEM  FILE  SPECIFICATION 

FILE  NAME:  DTS  Employee  Card  File 

DATA  SET  NAME:  EMPLCD 

NUMBER  OF  RECORD  FORMATS:  1 RECORD  SIZE:  80  Characters 

FILE  ORGANIZATION:  Random  Order 

RECORD  FORMATS 


FORMAT 

CODE 

RECORD  NAME 

MAX.  NO. 

MIN.  NO. 

DTS  Employee  Card 

U 

1 

PROGRAM 

USE 

PROGRAM 
IDENT . 

PROGRAM  NAME 

I/O 

PROGRAM  COBOL 
NAME  FOR  FILE 

EMP100 

DTS  Employee  File  Extract 

R 

INPUT-FILE 
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TABLE  6.7-2 


RECORD  SPECIFICATION 


RECORD  NAME:  DTS  Employee  Card  Record 

FILE  NAME:  DTS  Employee  Card  File 

COBOL  NAME  OF  RECORD:  INPUT-RECORD 

RECORD  FORMAT  CODE:  None 

RECORD  LENGTH:  80  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

4 

9(4) 

IN-DEPT-CODE 

Department  Code 

5 

1 

X 

IN-TRANSIT 

Transit  Employee 
Identifier  (=T) 

6 

4 

9(4) 

IN-EMP-NO 

Employee  Number 

10 

28 

X(28) 

FILLER 

38 

2 

XX 

IN-FUNCTION-CODE 

Job  Classification 

40 

1 

X 

FILLER 

41 

1 

9 

IN-ACCOUNT-CODE 

Acceptance  Account  Code 
(=7) 

42 

3 

X(3) 

FILLER 

45 

1 

9 

IN-SIX 

Payroll  Code  (=6) 

46 

5 

X(5) 

FILLER 

51 

3 

9V99 

IN-PAY-RATE 

Hourly  Pay  Rate 

54 

27 

X(27) 

FILLER 

TOTAL 


80 


6 • 8 Maintenance  Report  Generator  Control  File  - (MCNTRL) 


The  Maintenance  Report  Generator  Control  File  is  a disk  file. 

It  contains  a set  of  60-character  records  that  provide  control 
information  to  the  Maintenance  Report  Generator  program,  MIM200. 

The  records  contain  transit-specific  program  constants  for  calculating 
and  classifying  labor  costs  of  maintenance  work  performed. 

File  and  record  specifications  are  provided  in  Tables  6.8-1 
and  6.8-2. 
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TABLE  6.8-1 


R/C  SYSTEM  FILE  SPECIFICATION 

FILE  NAME:  Maintenance  Report  Generator  Control  File 

DATA  SET  NAME:  MCNTRL 

NUMBER  OF  RECORD  FORMATS:  1 RECORD  SIZE:  60  Characters 

FILE  ORGANIZATION:  Sequenced  by  transit  property  code:  61  = ACTD 

62  = DTS 


MIN.  NO. 
2 


RECORD  FORMATS 
FORMAT 

CODE  RECORD  NAME  MAX.  NO. 

Constants  Record  U 


PROGRAM  USE 


PROGRAM 

IDENT  PROGRAM  NAME  I/O 

MIM200  Maintenance  Report  Generator  R 


PROGRAM  COBOL 
NAME  FOR  FILE 

CONSTANTS 
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TABLE  6.8-2 


RECORD  SPECIFICATION 
RECORD  NAME;  Constants  Record 

FILE  NAME:  Maintenance  Report  Generator  Control  File 

COBOL  NAME  OF  RECORD:  None 

RECORD  LENGTH:  60  Characters 


FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

CONSTANT-CODE 

Transit  Property  Identifier 
Code 

3 

5 

99V999 

STANDARD-RATE 

Standard  Hourly  Rate 

8 

3 

9V99 

REGULAR- OVERT IME- 
RATE 

Overtime  Rate  as  Multiple 
of  Regular  Hours 

11 

3 

9V99 

SPECIAL-OVERTIME- 

RATE 

Holiday  Overtime  Rate  as 
Multiple  of  Regular  Hours 

14 

2 

9V9 

FRACTIONAL-HOUR- 

FACTOR 

Factor  for  Conversion  of 
Minutes  to  Fraction  of 
Hour 

16 

3 

9(3) 

RATE-APPLICABILITY 

Specification  of  Source 
of  Hourly  Rates 

19 

1 

9 

DIFFERENTIAL- 

APPLICABILITY 

Specification  of  Source 
of  Differential  Rate 

20 

1 

9 

OT-HOURS-APPLICA- 

BILITY 

Overtime  Hour  Calculation 
Flag 

21 

1 

9 

LC-IN-LOCATION- 

USE-FLAG 

Location  Flag  Default 
Indicator 

22 

30 

X(3) 

LOCATION-CODES 

(occurs  10  times) 

Report  Column  Location 
Identifers 

52 

TOTAL 

9 

60 

X(3) 

DIFFERENTIALS 

(occurs  3 times) 

Differential  Categories 
and  Rates 
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6 . 9 Maintenance  Report  Classification  File  (MCLASS) 


The  Maintenance  Report  Classification  File  is  a disk  file.  It 
contains  a table  of  transaction  classification  criteria.  This  table 
is  used  in  the  Maintenance  Report  Extract  program  (CLASSM) . Each 
table  entry  consists  of  data  defining  a type  of  maintenance  work, 
and  up  to  nine  classifications  under  which  that  maintenance  work  may 
be  reported.  The  table  is  used  in  the  Maintenance  Report  Extract 
program  (CLASSM)  to  classify  maintenance  labor  transactions. 

File  and  record  specifications  are  provided  in  Tables  6.9-1 
and  6.9-2. 
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TABLE  6.9-1 


R/C  SYSTEM  FILE  SPECIFICATION 


FILE  NAME:  Maintenance  Report  Classification  File 

DATA  SET  NAME:  MCLASS 

NUMBER  OF  RECORD  FORMATS:  1 RECORD  SIZE;  60  Characters 

FILE  ORGANIZATION:  Table  is  organized  by  estimated  frequency  of 

transactions,  in  terms  of  maintenance  work 
types  represented,  in  descending  order 

RECORD  FORMATS 


FORMAT 

CODE 

RECORD  NAME 

MAX.  NO. 

MIN.  NO. 

Classification  Record 

500 

1 

PROGRAM 

USE 

PROGRAM 
IDENT . 

PROGRAM  NAME 

I/O 

PROGRAM  COBOL 
NAME  FOR  FILE 

CLASSM 

Maintenance  Report  Extract 

R 

CLASSIFICATION-FILE 
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TABLE  6.9-2 


RECORD  SPECIFICATION 


RECORD  NAME:  Classification  Record 

FILE  NAME:  Maintenance  Report  Classification  File 

COBOL  NAME  OF  RECORD:  CLASSIFICATION 

RECORD  FORMAT  CODE:  None 

RECORD  LENGTH:  60  Characters 


FIELD 


FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

4 

X(4) 

MASK-FILED1 

Account  Number 

5 

2 

XX 

MASK-FIELD2 

Subaccount  Number 

7 

4 

X(4) 

MASK-FIELD3 

Work  Order  Number 

11 

1 

X 

MASK-FIELD4 

Vehicle  Fleet  Number 

12 

4 

X(4) 

MASK-FIELD5 

Vehicle  Number 

16 

2 

XX 

MASK-FIELD6 

Vehicle  Group  Code 

18 

2 

XX 

MASK- FI ELD 7 

Unit  Code 

20 

2 

XX 

MASK-FIELD8 

Work  Type/Reason  Code 

22 

36 

X(4) 

REPORT-CLASS IFI- 

Paragraph  and  Line  (with- 

CATION  AREA 

in  paragraph)  of  Report 

(occurs  9 times) 

for  Data  Entry 

58 

3 

X(3) 

FILLER 

TOTAL 

60 
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6.10  Report  Request  File  (CN1510.RPC. S.DATEFILE) 


The  Request  Date  File  is  a disk  file  created  through  the 
execution  of  the  Vehicle  Extract  program,  RE100.  It  contains  report 
request  records  that  specify  the  reports  to  be  produced  by  the 
Maintenance  Report  Generator  program,  MIM200.  Each  record  contains 
a report  code,  a date  giving  the  month  of  the  report,  and  the 
accumulated  miles  for  the  report  month. 

File  and  record  specifications  are  provided  in  Tables  6.10-1 
and  6.10-2. 
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TABLE  6.10-1 


R/C  SYSTEM  FILE  SPECIFICATION 


FILE  NAME:  Report  Request  File 


..... 

DATA  SET  NAME:  CN1510 . RPC. S . DATEFILE 

NUMBER  OF  RECORD  FORMATS:  1 

RECORD  SIZE:  18 

Characters 

FILE  ORGANIZATION:  Random  Order 

RECORD  FORMATS 

FORMAT 

CODE  RECORD  NAME 

MAX.  NO. 

MIN.  NO. 

Report  Request  Record 

3 

0 

PROGRAM 

USE 

PROGRAM 

PROGRAM  COBOL 

IDENT. 

PROGRAM  NAME 

I/O 

NAME  FOR  FILE 

RE100 

Vehicle  File  Extract 

W 

PDATE-FILE 

CLASSM 

Maintenance  Report  Extract 

R 

DATES-FILE 

M1M200 

Maintenance  Report  Genrator 

R 

DATE-FILE 
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TABLE  6.10-2 


RECORD  SPECIFICATION 


RECORD  NAME:  Report  Request  Record 

FILE  NAME;  Report  Request  File 
COBOL  NAME  OF  RECORD:  DATE-RE C 

RECORD  FORMAT  CODE:  None 

RECORD  LENGTH:  18  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

D-REPORT-NO 

Report  Code 

3 

6 

9(6) 

D-DATE 

Report  Date  (YYMMDD) 

9 

7 

9(7) 

D-ACCUM-MILES 

Vehicle  Miles  for 

Report  Period 

16 

3 

X(3) 

FILLER 

TOTAL 

18 
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6. 11  Date  Card  File  (DATECD ) 


The  Date  Card  File  is  a set- of  80-character  records  read  through 
the  job  stream  on  punched  cards.  The  file  contains  a user-supplied 
set  of  report  request  cards  for  Repair  Cost  System  reports.  Table 
6. 11-].  lists  the  valid  report  codes,  along  with  the  program  executed 
and  report  produced. 

File  and  record  specifications  are  given  in  Tables  6.11-2  and 


6.11-3. 


TABLE  6.11-1 


SIMS  REPAIR  COST  REPORT  CODES 


REPORT  CODE 
Rl 


R2 


PROGRAM  EXECUTED  REPORTS  GENERATED 

RP080  Bus  Repair  Cost  By- 

Subassembly 

Bus  Repair  Cost  By 
Subassembly  - Labor  Only 

Bus  Repair  Cost  By 
Subassembly  - Parts  Only 

M1M200  Hourly  Maintenance  Labor 

Utilization  Report 

Maintenance  Labor  Cost 
Report 
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TABLE  6.11-2 


R/C  SYSTEM  FILE  SPECIFICATION 


FILE  NAME:  Date  Card  File 


DATA  SET  NAME:  DATECD 


NUMBER  OF  RECORD  FORMATS:  1 


RECORD  SIZE:  80  Characters 


FILE  ORGANIZATION:  Random  Order 


RECORD  FORMATS 


FORMAT 

CODE 


RECORD  NAME 


MAX.  NO. 


MIN.  NO. 


Date  Record 


PROGRAM 

USE 

PROGRAM 

PROGRAM  COBOL 

IDENT . 

PROGRAM  NAME 

I/O 

NAME  FOR  FILE 

RE100 

Vehicle  File 

R 

I CARD- FILE 
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TABLE  6.11-3 


RECORD  SPECIFICATION 


RECORD  NAME:  Date  Record 

FILE  NAME:  Date  Card  File 

COBOL  NAME  OF  RECORD:  WS-REQ-RECORD 

RECORD  FORMAT  CODE:  None 

RECORD  LENGTH:  80  Characters 

FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

WS-REQ-CDE 

Report  Code 

3 

6 

9(6) 

WS-REQ-DATE 

Report  Date  (YYMMDD) 

9 

1 

X 

FILLER 

10 

6 

9(6) 

WS-REQ-DATE2 

Report  Period  Ending 

16 

65 

FILLER 

TOTAL  80 


Note:  Use  of  this  input  record  is  described  in  Section  4.3 
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6.12  Temporary  Labor  Transaction  File  (&RPCTRAN) 


The  Temporary  Labor  Transaction  File  is  a disk  file  created 
through  execution  of  the  Data  Acceptance  progran,  DA500.  It  contains 
maintenance  labor  distribution  transactions  that  have  been  reformated 
for  processing  by  the  Repair  Cost  System.  This  temporary  file  is 
deleted  upon  completion  of  the  system  run. 

File  specifications  are  provided  in  Table  6.12-1.  The  speci- 
fications for  the  single  type  of  record,  Reformated  Labor  Distri- 
bution Record,  are  the  same  as  for  the  Labor  Distribution  Record 
described  in  Table  6.1-2. 


TABLE  6.12-1 


R/C  SYSTEM  FILE  SPECIFICATION 

FILE  NAME:  Temporary  Labor  Transaction  File 

DATA  SET  NAME:  &RPCTRAN 

NUMBER  OF  RECORD  FORMATS:  1 RECORD  SIZE: 

FILE  ORGANIZATION:  Random  Order 

RECORD  FORMATS 


FORMAT 

CODE  RECORD  NAME  MAX.  NO. 


Reformatted  Labor  Distribution  U 

Record 


PROGRAM  USE 
PROGRAM 

I DENT.  PROGRAM  NAME  I/O 

DA500  Data  Acceptance  (ACTD  & DTS)  W 

DG500  Labor  Transaction  History  File  R 

Edit/Update 


Note:  Record  specifications  are  the  same  as  for  the 

Record  (see  Table  6.1-2). 


120  Characters 


MIN.  NO. 
1 


PROGRAM  COBOL 
NAME  FOR  FILE 

OUTPUT-DIST-TRAN 

INPUT-TRAN-TEMP 


Labor  Distribution 
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6.13  Labor  Hours  Extract  File  (&LABOR) 


The  Labor  Hours  Extract  File  is  a temporary  disk  file  created 
through  execution  of  the  Maintenance  Report  Extract  program,  CLASSM. 
It  contains  labor  transactions,  read  from  the  Labor  Transaction 
History  File,  which  have  been  reformatted  for  processing  by  the 
Maintenance  Report  Generator  program,  MIM200.  Only  transactions 
for  the  report  period  are  included.  This  file  is  deleted  upon  ter- 
mination of  the  R/C  System  run. 

File  and  record  specifications  are  given  in  Tables  6.13-1  and 
6.13-2. 
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TABLE  6.13-1 


R/C  SYSTEM  FILE  SPECIFICATION 


FILE  NAME:  Labor  Hours  Extract  File 


DATA  SET  NAME:  &LABOR 

NUMBER  OF  RECORD  FORMATS:  1 RECORD 

SIZE:  80 

Characters 

FILE  ORGANIZATION:  Sequenced  by  Processing  Date 

RECORD  FORMATS 

FORMAT 

CODE 

RECORD  NAME 

MAX.  NO. 

MIN.  NO. 

PROGRAM 

PROGRAM 

Labor  Extract  Record 

USE 

U 

1 

PROGRAM  COBOL 

IDENT. 

PROGRAM  NAME 

I/O 

NAME  FOR  FILE 

CLASSM 

Maintenance  Report  Extract 

W 

OUTPUT-DATA 

M1M200 

Maintenance  Report 

R 

INPUT-DATA 
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TABLE  6.13-2 


RECORD  SPECIFICATION 


RECORD  NAME:  Labor  Extract  Record 

FILE  NAME:  Labor  Hours  Extract  File 

COBOL  NAME  OF  RECORD:  M-OUTPUT-RECORD 

RECORD  FORMAT  CODE:  None 

RECORD  LENGTH:  80  Characters 

FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

99 

OUTPUT-REPORT-CODE 

Report  Code 

3 

4 

X(4) 

OUTPUT-DATA-CLASS 

See  Note  1 

7 

6 

9(6) 

OUTPUT-DATE 

Transaction  Date  (YYMMDD) 

13 

68 

X(68) 

FILLER 

See  Note  2 

TOTAL 

80 

Note  1:  OUTPUT-DATA-CLASS  contains  the  values  classifying  the  trans- 

action for  reporting  purpose.  The  first  two  characters  specify 
the  report  line;  the  last  two  characters  specify  the  report 
column. 

Note  2:  This  field  contains  the  data  elements  specified  for  character 

positions  29  through  96  of  the  Labor  Distribution  Record  (see 
Table  6.1-12). 
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6.14  Labor  Cost  Extract  File  (&LBCOST) 


The  Labor  Cost  Extract  File  is  a temporary  disk  file  created 
through  execution  of  the  Labor  Cost  File  Extract  program,  RE300.  It 
contains  records  of  labor  charges  by  vehicle  number  and  group  code. 
These  records  are  extracted  from  the  Labor  Transaction  History  File 
(see  Section  6.1).  This  temporary  file  is  deleted  upon  completion  of 
the  R/C  System  run. 

File  and  record  specifications  are  given  in  Tables  6.14-1  and 
6.14-2. 
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TABLE  6.14-1 


R/C  SYSTEM  FILE  SPECIFICATION 

FILE  NAME:  Labor  Cost  Extiact  File 

DATA  SET  NAME;  &LBCOST 

NUMBER  OF  RECORD  FORMATS:  1 RECORD  SIZE:  18 

FILE  ORGANIZATION:  Sequenced  by  Vehicle  Number 

Group  Code 

RECORD  FORMATS 
FORMAT 

CODE  RECORD  NAME  MAX.  NO. 

1 Labor  Cost  Record  U 


PROGRAM  USE 
PROGRAM 

IDENT.  PROGRAM  NAME  I/O 

RE300  Labor  Cost  File  Extract  W 

RP080  Bus  Repair  Cost  Report  R 

Gnerator 


Characters 


MIN.  NO. 

0 


PROGRAM  COBOL 
NAME  FOR  FILE 

OSORT-FILE 

PLABR-FILE 
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TABLE  6.14-2 


RECORD  SPECIFICATION 


RECORD  NAME:  Labor  Cost  Record 

FILE  NAME:  Labor  Cost  Extract  File 

COBOL  NAME  OF  RECORD:  OSORT-REC 

RECORD  FORMAT  CODE:  1 

RECORD  LENGTH:  18  Characters 


FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

1 

9 

WS-SET12 

Format  Code  (=1) 

2 

4 

9(4) 

WS-VEH-N02 

Vehicle  Number 

6 

2 

XX 

WS-GROUP-CODE 

Group  Code 

8 

1 

9 

WS -NEW- CODE 2 

= 2 

9 

10 

S9 (6) V9 (4) 

WS -VALUE 2 

Labor  Cost  of  Worl 
formed 

TOTAL  18 
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6. 15  Materials  Cost  Extract  File  (&PTCOST) 


The  Materials  Cost  Extract.  File  is  a temporary  disk  file  created 
through  execution  of  the  Materials  Cost  File  Extract  program,  RE200. 
It  contains  records  of  the  cost  of  materials  issued  for  vehicle  re- 
pair. The  records  are  extracted  from  the  SIMS  Inventory  Transaction 
History  File  (see  Section  6.2).  This  temporary  file  is  deleted  upon 
completion  of  the  R/C  System  run. 

File  and  record  specifications  are  given  in  Tables  6.15-1  and 
6.15-2. 
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TABLE  6.15-1 


R/C  SYSTEM  FILE  SPECIFICATION 


FILE  NAME:  Materials  Cost  Extract  File 


DATA  SET  NAME:  &PTCOST 

NUMBER  OF  RECORD  FORMATS:  1 

FILE  ORGANIZATION:  Sequenced  by: 

RECORD  FORMATS 


RECORD  SIZE:  18  Characters 

Vehicle  Number 

Inventory  Class  Code 


FORMAT 

CODE 

RECORD  NAME 

MAX.  NO. 

MIN.  NO. 

1 

Parts  Cost  Record 

U 

0 

PROGRAM 

PROGRAM 

IDENT. 

USE 

PROGRAM  NAME 

I/O 

PROGRAM  COBOL 
NAME  FOR  FILE 

RE200 

Materials  Cost  File 

W 

OSORT-FILE 

Extract 

RP080 

Bus  Repair  Cost  Report 

R 

PTRAN-FILE 

Generator 
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TABLE  6.15-2 


RECORD  SPECIFICATION 


RECORD  NAME:  Parts  Cost  Record 

FILE  NAME:  Materials  Cost  Extract  File 

COBOL  NAME  OF  RECORD:  OSORT-RECORD 

RECORD  FORMAT  CODE:  1 

RECORD  LENGTH:  18  Characters 


FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

1 

9 

WS-SET11 

Format  Code  (=1) 

2 

4 

9(4) 

WS-VEH-NOl 

Vehicle  Number 

6 

2 

99 

WS-CLASS-CODE 

Inventory  Class  Code 

8 

1 

9 

WS-NEW-CODE1 

Parts  Cost  Record 

Identifier 

9 

10 

S9 (6) V9 (4) 

WS -VALUE 1 

Cost  of  Part 

TOTAL 

18 

6 . 16  Vehicle  Extract  File  (&BUSLST) 


The  Vehicle  Extract  File  is  a temporary  disk  file  created  through 
execution  of  the  Vehicle  File  Extract  Program  (RE100) . It  contains 
one  record  for  each  vehicle  on  the  Vehicle  Master  File  (see  Section 
6.3).  The  records  contain  information  necessary  to  execute  the  Bus 
Repair  Cost  Report  Generator  program.  This  file  is  deleted  upon  ter- 
mination of  the  R/C  System  run. 

File  and  record  specifications  are  given  in  Tables  6.16-1  through 
6.16-3. 
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TABLE  6.16-1 


R/C  SYSTEM  FILE  SPECIFICATION 


FILE  NAME:  Vehicle  Extract  File 

DATA  SET  NAME:  &BUSLST 

NUMBER  OF  RECORD  FORMATS:  2 RECORD  SIZE:  18  Characters 

FILE  ORGANIZATION:  Records  are  sequenced  by  vehicle  number. 

RECORD  FORMATS 


FORMAT 

CODE  RECORD  NAME  MAX.  NO.  MIN.  NO. 

23  Report  Period  Specification  1 0 

1 Vehicle  Record  U 0 


PROGRAM  USE 


PROGRAM 

IDENT.  PROGRAM  NAME 


PROGRAM  COBOL 
I/O  NAME  FOR  FILE 


RE100  Vehicle  File  Extract 

RE200  Materials  Cost  File  Extract 

RE300  Labor  Cost  File  Extract 

RP080  Bus  Repair  Cost  Report 

Generator 


W 

R 

R 

R 


PMSTR-FILE 

PMSTR-FILE 

PMSTR-FILE 

PMSTR-FILE 
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TABLE  6.16-2 


RECORD  SPECIFICATION 


RECORD  NAME:  Report  Period  Specification  Record 

FILE  NAME:  Vehicle  Extract  File 


COBOL  NAME  OF 

RECORD: 

WS-CARD-RECORD 

RECORD 

FORMAT 

CODE: 

23 

RECORD 

LENGTH: 

18  Characters 

FIELD 

FIELD 

POS. 

LENG. 

FORMAT  COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

XX 

WS-REQ-CODE 

Format  Code(=23) 

3 

6 

9(6) 

IC-DATE-MIN 

Beginning  Date  for  Report 

Period  (YYMMDD) 

9 

1 

1 

FILLER 

10 

6 

9(6) 

IC-DATE-MAX 

Ending  Date  for  Report 

Period  (YYMMDD) 

16 

3 

XXX 

FILLER 

TOTAL 

18 

Note: 

This  record  is 

always  the  first  record 

on  the  Vehicle  Extract  File. 
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TABLE  6.16-3 


RECORD  SPECIFICATION 


RECORD  NAME:  Vehicle  Record 

FILE  NAME:  Vehicle  Extract  File 

COBOL  NAME  OF  RECORD:  PMSTR- RECORD 


RECORD  FORMAT  CODE:  1 


RECORD  LENGTH:  18  Characters 


FIELD 

POS. 

FIELD 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

1 

9 

WS-SET1 

Format  Code  (=1) 

2 

4 

9(4) 

WS-BUS-NO 

Vehicle  Number 

6 

3 

9(3) 

FILLER 

9 

2 

XX 

WS-DIV-NO 

Division  Number 

11 

5 

S9(5) 

WS-PERIOD-MILES 

Vehicle  Miles  for 
Report  Period 

16 

2 

XX 

WS-FLEET-NBE. 

Fleet  Number 

18 

1 

X 

FILLER 

TOTAL 


18 


7.0  PROGRAM  DESCRIPTIONS 


This  section  describes  the  individual  programs  that  are  referenced 
in  the  System  Procedures  section  (Section  5.0).  The  source  listings 
of  these  programs  are  contained  in  Supplement  I to  this  document. 

The  programs  included  in  the  SIMS  Repair  Cost  System  are  listed 
in  Table  7.0-1  in  terms  of  program  identification,  program  name,  and 
the  subsection  that  describes  the  program.  The  description  of  a pro- 
gram includes: 

(a)  Introduction, 

(b)  Program  Flowchart 

(c)  System  Interfaces, 

(d)  Program  Files, 

(e)  Processing  Functions,  and 

(f)  Error  Messages. 

The  Data  Acceptance  programs  and  the  Labor  Transaction  History 
File  Edit/Update  program  are  described  in  more  detail  than  the  file 
extract  and  report  generator  programs.  The  report  generator  programs 
use  the  COBOL  report  writer  and  descriptions  of  these  programs  include 
user  report  formats.  At  the  top  of  the  illustration  of  each  report 
format  are  rows  of  numbers  indicating  the  print  positions. 
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TABLE  7.0-1 


INDEX  OF  REPAIR  COST  SYSTEM  PROGRAMS 


Subsection 

Number 

Program 

Identification 

Program  Name 

7.1 

DA500A 

Data  Acceptance  - ACTD 

7.2 

DA500D 

Data  Acceptance  - DTS 

7.3 

DG500 

Labor  Transaction  History  File 
Edit/Update 

7.4 

CLASS M 

Maintenance  Report  Extract 

7.5 

M1M200 

Maintenance  Report  Generator 

7.6 

RE  100 

Vehicle  File  Extract 

7.7 

RE200 

Materials  Cost  File  Extract 

7.8 

RE300 

Labor  Cost  File  Extract 

7.9 

RP080 

Bus  Repair  Cost  Report  Generator 

7.10 

EMP100 

DTS  Employee  File  Extract 
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7 • 1 DA500A  - Data  Acceptance  (ACTD) 


The  ACTD  Data  Acceptance  'program  is  designed  to  reformat  main- 
tenance labor  distribution  records  for  further  processing  by  the  SIMS 
Repair  Cost  System.  Basic  edit  functions  are  performed  to  eliminate 
transactions  with  gross  errors.  The  reformatting  procedure  consists 
of  adding  a l6-character  prefix  and  a 2U-character  suffix.  The  pre- 
fix constitutes  a sort  key  that  may  be  used  to  sort  the  data.  The 
suffix  provides  for  the  addition  of  information  not  currently  entered 
in  the  system. 

7.1.1  System  Interfaces 

Figure  7-1-1  is  a program  flowchart.  The  Data  Acceptance  pro- 
gram input  consists  of  the  ACTD  Labor  Transaction  File,  AC. TIME. CARDS, 
read  from  magnetic  tape. 

Program  output  consists  of  a report  of  erroneous  transactions, 
and  a file  of  reformatted  labor  transactions.  This  file,  &RPCTRAN, 
is  a temporary  disk  file.  It  is  used  as  input  to  the  Labor  Trans- 
action History  File  Edit/Update  program,  DG500. 

7.1.2  Program  Files 

No  internal  file  is  created  during  program  execution. 

7.1.3  Processing  Functions 

As  illustrated  in  Figure  7.1-1,  the  program  reads  the  ACTD  Labor 
Transaction  File  from  magnetic  tape.  The  file  contains  80-character 
records  that  have  been  copied  to  magnetic  tape  from  cards.  Each 


7-3 


FIGURE  7.1-1 

DA500  PROGRAM  FLOWCHART 
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transaction  is  edited  to  eliminate  those  with  gross  errors.  The  edit 
criteria  are: 

(a)  the  employee  number  must  be  numeric, 

(b)  the  transaction  date  must  be  numeric,  and 

(c)  character  position  ten  (10 ) of  the  80-character  record 
must  not  be  equal  to  . 

Transactions  that  fail  any  of  the  edit  tests  are  rejected. 

They  are  displayed  on  an  edit  list  with  an  asterisk  under  the  fields 
in  error. 

Transactions  that  pass  the  edit  criteria  are  reformatted  for 
processing  by  the  edit/update  program,  DG500.  A l6-character  sort 
key  is  added  consisting  of  processing  date,  transaction  date,  and 
employee  number.  A 2H-character  suffix  is  added  consisting  of  a filler 
field  of  zeros.  This  field  is  not  currently  used  in  the  Repair  Cost 
System. 

When  all  transactions  have  been  processed,  program  execution 
terminates . 

7.1.U  Error  Messages 

The  Data  Acceptance  program  produces  no  error  message. 

7.1.5  Remarks 

If  no  valid  input  transactions  are  found,  the  program  assumes 
that  an  error  has  occurred.  A system  return  code  of  eight  (8)  is 
produced,  which  cancels  further  system  processing.  An  indicative 
message  is  printed  when  this  error  occurs. 
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7 • 2 DA500D  - Data  Acceptance  (DTS) 


The  DTS  Data  Acceptance  program  is  designed  to  reformat  main- 
tenance labor  distribution  records  for  futher  processing  by  the  SIMS 
Repair  Cost  System.  Basic  edit  funtions  are  performed  to  eliminate 
transactions  that  contain  gross  errors.  The  reformatting  consists  of 
adding  the  hourly  pay  rate  and  organization  code  to  the  transaction 
and  creating  a l6-character  prefix  and  a 2^-character  suffix.  The 
prefix  constitutes  a sort  key;  the  suffix  provides  for  the  addition 
of  information  not  currently  entered  in  the  system. 

7-2.1  System  Interfaces 

Figure  7*2-1  is  a program  flowchart.  Program  input  consists  of: 

(a)  DTS  Labor  Transaction  File,  DTS. TIME. CARDS. 

(b)  Employee  Master  File,  CN1510.RPC.M.EMPFILE,  created  through 
the  execution  of  the  DTS  Employee  Pile  Extract  program, 
EMP100. 

Program  output  consists  of  a print  file  and  the  Temporary  Labor 
Transaction  File,  &RPCTRAN.  The  latter  is  input  to  the  Labor  Trans- 
action History  File  Edit/Update  program,  DG500. 

7.2.2  Program  Files 

No  program  file,  other  than  the  print  file,  is  created  during 
execution. 

7-2.3  Processing  Functions 

As  illustrated  in  Figure  7*2-1,  the  program  reads  two  input 
data  sets.  The  contents  of  the  Employee  Master  File  are  used  to  create 
a table  in  working  storage.  This  table  is  organized  by  employee  number 
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FIGURE  7.2-1 

DA500D  PROGRAM  FLOWCHART 
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and  contains  the  employee's  hourly  pay  rate  and  a code  identifying 
the  organizational  unit  to  which  he  is  assigned. 

The  DTS  Labor  Transaction  File  records  are  sorted  by  employee 
number.  The  sorted  records  are  edited  to  eliminate  gross  errors. 

The  edit  criteria  are: 

(a)  The  employee  number  must  be  numeric. 

(b)  The  transaction  date  must  be  numeric. 

(c)  Transit  identification  code  must  be  equal  to  'T'. 

(d)  If  the  exception  pay  code  is  equal  to  the  hourly  pay 

rate  must  be  included  in  the  input  record. 

Transactions  that  fail  the  edit  tests  are  rejected.  They  are 
displayed  on  the  Data  Acceptance  Edit  List.  An  asterisk  is  printed 
under  the  low  order  byte  of  the  fields  in  error. 

Transactions  that  pass  the  edit  tests  are  reformatted  for  pro- 
cessing by  the  edit/update  program,  DG500.  During  this  processing 
step,  input  values  are  converted  and  additional  information  is  obtained 
from  the  table  in  working  storage.  Reformatting  includes  the  addition 
of  a l6-character  sort  key  and  of  a 2U-character  suffix,  which  is  zero- 
filled.  The  suffix  is  not  currently  used  in  the  Repair  Cost  System. 

Other  processing  functions  performed  during  the  creation  of  the 
output  record,  LC-TRAN-RECORD,  are: 

(a)  Values  of  straight-time  hours  and  overtime  hours  are  added 
to  obtain  hours  worked  (regular  hours)  and  premium  cost 
equivalent  hours  (premium  hours)  are  calculated.  Premium 
hours  represent  the  overtime  premium  cost  in  terms  of 
straight-time  hours. 
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(b)  The  employee  table  is  searched  and  hourly  pay  rate  and 
organization  code  are  obtained. 

(c)  A dummy  sub-account  number,  40,  is  moved  to  the  Sub-Account 
Number  field,  if  the  input  record  does  not  contain  a valid 
value  in  the  premium  pay  code  field,  DTS-BONUS-CODE. 

The  reformatted  records  are  -written  out  to  the  Temporary  Labor 
Transaction  File,  &RPCTRAN. 

J.2.k  Error  Messages 

If  the  program  is  executed  without  any  input  records,  the  following 
message  is  printed: 

'NO  DISTRIBUTION  CARDS  FOUND'. 

* 

7.2.5  Remarks 

The  employee  table  can  contain  entries  for  up  to  300  employees. 

If  a labor  distribution  record  is  rejected  because  of  an  invalid  em- 
ployee number,  the  following  message  is  printed  on  the  edit  list  under 
the  transaction: 

'EMPLOYEE  NUMBER  NOT  IN  PAYROLL  FILE'. 


7 • 3 DG^OOA  (ACTD)  and  DG50QD  (DTS)  - Labor  Transaction  History 

File  Edit/Update 

Labor  Transaction  History  File  Edit/Update  program  reads  a file 
of  input  transactions  and  uses  them  to  update  the  Labor  Transaction 
History  File,  CN1510 . RPC . M. TRANHIST.  Edit  functions  are  performed 
against  each  transaction.  Those  that  fail  the  edit  tests  are  rejected 
and  displayed  on  an  edit  list.  Valid  transactions  are  passed  to  the 
new  version  of  the  Labor  Transaction  History  File  being  created. 

7.3.1  System  Interfaces 

Figure  7-3-1  is  a program  flowchart.  Program  input  consists  of 
the  Temporary  Labor  Transaction  File,  &RPCTRAN,  produced  by  the  Data 
Acceptance  program,  DA500,  and  the  current  version  of  the  Labor  Trans- 
action History  File,  CW1510.RPC.M.TRAHHIST( 0) . 

Program  output  consists  of  an  edit  report  of  erroneous  trans- 
actions, and  an  updated  version  of  the  Labor  Transaction  History  File, 
CN1510.RPC .M. TRANHIST( +1 ) . The  Labor  Transaction  History  File  is  a 
generation  data  set.  Three  versions  of  this  file  are  saved  by  the 
system  at  all  times . 

7.3.2  Program  Files 

The  Labor  Transaction  History  File  Edit/Update  program  creates  no 
internal  file  during  exection. 

7.3.3  Processing  Functions 

As  illustrated  in  Figure  7-3-1,  the  program  copies  the  current 
version  of  the  Labor  Transaction  History  File  to  the  updated  version 
When  this  process  is  completed,  the  Temporary  Labor  Transaction  file 
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FIGURE  7.3-1 

DG500 PROGRAM  FLOWCHART 
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is  read.  Each  transaction  is  edited  against  a list  of  criteria. 

Table  7-3-1  lists  these  edit  criteria  for  ACTD  transactions,  and  Table 
7-3-^  lists  the  criteria  for  DTS  transactions. 

A transaction  that  passes  all  edit  tests  is  output  to  the  new 
version  of  the  Labor  Transaction  History  File.  Erroneous  transactions 
are  displayed  on  the  transaction  edit  report. 

Program  execution  terminates  when  all  input  transactions  have 
been  processed. 

7-3.^  Error  Messages 

The  Labor  Transaction  History  File  Edit/Update  program  produces 
no  error  message. 

7.3.5  Remarks 

Two  versions  of  the  program  currently  exist,  DG500A  for  (ACTD) 
and  DG500D  for  (DTS).  Different  versions  were  necessary  because  of 
differences  in  valid  account  numbers  used  by  the  properties,  and  in 
edit  criteria.  The  basic  processing  functions  are  the  same. 
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TABLE  7.3-1 


DG500A  EDIT  CRITERIA  (ACTD) 


Transaction  Type Edit  Function  

Labor  Distribution  Record  _ The  hour  modifier  code  must  be  spaces 

or  ' - ' . 

The  work  shift  must  be  spaces,  1, 
or  2. 

The  hours  worked  field  must  be 
numeric . 

The  premium  hours  worked  must  be 
spaces  or  numeric  . 

The  group-unit  code  must  be  spaces 
or  numeric. 

The  organization  code  must  be  one  of 
these  values:  12,  13,  1^+,  25,  2 6, 

or  28. 

If  the  work-reason  code  is  00,  set  to 

01. 


The  work-reason  code  must  be  a valid 
combination.  See  Table  7.3-2  for  a 
listing  of  valid  codes. 

Employee  number  must  be  numeric. 

The  employee  pay  rate  must  be  numeric. 

If  the  work  order  control  field  equals 
, move  spaces  to  the  work  order 
control  field.  Also,  the  work  order 
must  be  numeric. 

The  account  number  must  be  a valid 
account  number.  Table  7-3-3  lists 
valid  account  numbers  for  ACTD. 

The  division  code  must  be  spaces,  0, 

2,  3,  or  h. 
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TABLii  7-3-1  (Concluded) 


Transaction  Type Edit  Function __ 

The  vehicle  number  must  be  spapes 
or  numeric. 

The  fleet  code  must  be  spaces  or 
equal  to  six  (6). 

The  transaction  date  must  be  valid 
as  follows: 


( a ) numer i c , 

(b)  year  must  be  non- zero, 

( c ) day  between  1 and  31 , and 

(d)  month  between  1 and  12. 
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TABLE  7.3-2 


Work-Reason 

Spaces 

01 

03 

07 

10 

12 

13 

lU 

15 

1 6 

17 

18 

20 

21 


VALID  WORK-REASON  CODES 


Code Description 

Work  reason  not  applicable 

Inspection  scheduled  on  the  basis  of 
miles  traveled  by  the  vehicle  since 
the  last  inspection 

Inspection  performed  as  a direct 
result  of  a maintenance  management 
decision 

Inspection  performed  after  a vehicle 
is  involved  in  an  accident  to  ascertain 
required  repair  work 

Repairs  performed  to  correct  a fault 
detected  during  an  inspection 

Repairs  performed  because  a mal- 
function was  reported  by  the  operator 

Repairs  performed  as  a direct  result 
of  a maintenance  management  decision 

Repairs  performed  at  a maintenance 
facility  to  correct  a defect  which 
resulted  in  a road  call 

Modification  of  a component  in  place 
on  the  vehicle,  performed  under  a 
campaign  or  capital  improvement 
program 

Repairs  performed  due  to  vandalism 

Repairs  performed  due  to  accident 

Repairs  performed  to  correct  a fault 
detected  during  servicing 

Rebuild  work  performed  on  a component 
removed  to  correct  a fault  detected 
during  inspection 

Rebuild  work  performed  on  a component 
removed  on  the  basis  of  miles  traveled 
by  the  vehicle  since  the  component 
was  installed. 
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TABLE  7-3-2  (Continued) 


Work-Reason  Code 

Description 

22 

Rebuild  work  performed  on  a component 
removed  to  correct  a malfunction 
reported  by  the  operator 

23 

Rebuild  work  performed  on  a component 
removed  as  a direct  result  of  a 
maintenance  management  decision 

2h 

Rebuild  work  performed  on  a component 
removed  to  correct  a defect  that 
resulted  in  a road  call 

25 

Rebuild  work  performed  to  modify  a 
component 

26 

Rebuild  work  performed  on  a component 
removed  as  the  result  of  vandalism 

27 

Rebuild  work  performed  on  a component 
removed  as  the  result  of  an  accident 

28 

Rebuild  work  performed  on  a component 
removed  to  correct  a fault  detected 
during  servicing 

30 

Replacement  of  a component  to  correct 
a fault  detected  during  inspection 

31 

Replacement  of  a component  on  the 
basis  of  the  miles  traveled  by  the 
vehicle  since  the  component  was  in- 
stalled 

32 

Replacement  of  a component  because  a 
malfunction  was  reported  by  the 
operator 

33 

Replacement  of  a component  as  a direct 
result  of  a maintenance  management 
decision 

3b 

Replacement  of  a component  to  correct 
a defect  which  resulted  in  a road 
call 
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TABLE  7-3-2  (Continued) 


Work-Reason  Code 


Description 


35 

36 

37 

38 
43 

45 

54 

56 

57 
6o 

62 

63 

64 


Replacement  of  a component,  performed 
under  a campaign  or  capital  improve- 
ment program 

Replacement  of  a component  as  a result 
of  vandalism 

Replacement  of  a component  as  a 
result  of  an  accident 

Replacement  of  a component  to  a correct 
a fault  detected  during  servicing 

Installation  of  a component  as  a 
direct  result  of  a maintenance  manage- 
ment decision 

Installation  of  a component,  per- 
formed under  a campaign  or  capital 
improvement  program 

Road  call  required  for  reasons  other 
than  vandalism  or  an  accident 

Road  call  required  because  of 
vandalism 

Road  call  required  because  of  an 
accident 

Work,  to  correct  a fault  detected 
during  an  inspection,  found  to  be 
unnecessary 

Work,  to  correct  a malfunction  re- 
ported by  an  operator,  found  to  be 
unnecessary 

Work,  required  as  a direct  result  of 
a maintenance  management  decision, 
found  to  be  unecessary 

Work,  required  to  correct  a defect 
which  resulted  in  a road  call,  found 
to  be  unnecessary 
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TABLE  7.3-2  (Concluded) 


Work-Reason  Code 

Description 

67 

Worked,  required  as  the  result  of 
an  accident,  found  to  he  unnecessary 

68 

Work,  required  to  correct  a fault 
detected  during  servicing,  found  to 
he  unnecessary 
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TABLE  7.3-3 


ACTD  VALID  ACCOUNT  NUMBERS 


Account 

Number 

Sub-Account 

Number 

Account  Title 

4110 

00 

Supervision  of  Shop  and  Garage  - Salaries 
and  Expenses 

4121 

00 

Repairs  to  Shop  and  Garage  Equipment 

4121 

01 

Repairs  to  Data  Collectors 

4122 

00 

Operation  and  Maintenance  of  Service  Equip- 
ment 

4128 

00 

Repairs  to  Shop  and  Garage  Buildings  and 
Grounds 

4132 

00 

Other  Shop  and  Garage  Expenses 

4i4o 

00 

Parts  for  Revenue  Equipment  Repair 

4i4i 

00 

Repairs  to  Revenue  Equipment  - Labor  and 
Materials 

4142 

00 

Repairs  to  Bus  Air  Conditioning  Equipment 
Labor  and  Materials 

4144 

00 

Repairs  to  Revenue  Equipment  - Accident 

4l45 

00 

Repairs  to  Fare  Boxes 

4150 

00 

Servicing  Revenue  Equipment  - Labor  and 
Materials 

4210 

00 

Supervision  of  Transportation  - Salaries  an< 
Expenses 

4264 

01 

Other  Transportation  Expenses 

4264 

02 

Maintenance  of  Radio  Equipment  and  District 
Communication  Systems 

4311 

00 

San  Francisco  Terminal  and  Other  Station 
Expense  - Salaries  and  Commissions 

4314 

00 

San  Francisco  Terminal  and  Other  Station 
Expense  - Supplies  and  Expenses 
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TABLE  7-3-3  (Continued) 


Account 

Number 

Sub-Account 

Number 

Account  Title 

4319 

00 

San  Francisco  Terminal  and  Other  Station 
Expense  - Repairs  to  Buildings  and  Equip- 
ment 

4420 

00 

Special  Service  Bureau  - Charter 

4470 

00 

Public  Information  and  Advertising  Expense 

4510 

00 

Salaries  and  Expenses  - Safety  Department 

4516 

00 

Automobile  Expense  - Claim  Department 

4634 

00 

Other  General  Office  Expense 

4652 

02 

Employee  Injury  on  Duty  - Remainder  of 
Day 

4562 

03 

Employee  Injury  on  Duty  - Waiting  Period 

4652 

04 

Employee  Sick  Leave 

4652 

08 

Employee  Sick  Leave  - Remainder  of  Day 

4655 

02 

Purchasing  Expense 

4656 

02 

Other  General  Expenses 

4656 

03 

Voting  Time 

4656 

04 

Jury  Pay 

4656 

05 

Funeral  Leave 

4656 

06 

Military  Leave 

1131 

00 

Miscellaneous  Accounts  Receivable 

1291 

00 

Unfinished  Construction 

1803 

10 

Demonstration  Grant  - Computer  Project 
- Receivable  from  U.S.  Government 

1803 

11 

Capital  Grant  - Buses  and  Radios  - Receivable 
from  U.S.  Government 
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TABLE  7.3-3  (Concluded) 


Account 

Number 

Sub-Account 

Number 

Account 

Title 

Memorandum  accounts: 

2072 

01 

Vacations  Paid 

- Earned 

Prior  Year 

2072 

02 

Vacations  Paid 

- Earned 

Current  Year 

U998 

00 

Holiday  Pay  on 

Employee ' 

1 s Non-worked  Days 

4999 

00 

Holiday  Not  Worked 

Note:  Sub-Account  Number  '00'  is  a dummy  sub-account  added  to  the 

transaction  during  keypunching. 


TABLE  7.3-U 


DG500D  EDIT  CRITERIA  (DTS) 


Transaction  Type Edit  Function 

Labor  Distribution  Record  The  hour  modifier  code  must  be  spaces 

or  . 

The  hours  worked  field  must  be 
numeric. 

The  premium  hours  worked  must  be 
spaces  or  numeric. 

The  group-unit  code  must  be  spaces 
or  numeric. 

The  organization  code  must  be  one 
of  these  values:  11,  12,  25,  or  26. 

If  the  work  reason  code  is  00,  set 
to  01. 

The  work-reason  code  must  be  a 
valid  combination.  See  Table  7*3-2 
for  a listing  of  valid  codes. 

Employee  number  must  be  numeric. 

The  employee  pay  rate  must  be  numeric. 

Either  the  work  order  field  or  the 
account  field  must  be  numeric,  but  not 
both. 

If  the  account  number  is  numeric,  it 
must  be  a valid  number.  Table  7*3-5 
lists  DTS  valid  accounts. 

The  vehicle  number  must  be  spaces 
or  numeric. 

The  transaction  date  must  be  valid 
as  follows : 


(a) 

numeric , 

(b) 

year  must  be  : 

non- zero. 

(c) 

day  between  1 

and  31,  and 

(d) 

month  between 

1 and  12. 
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TABLE  7.3-5 


DTS  VALID  ACCOUNT  NUMBERS 


Account 

Number 

Sub-Account 

Number 

Account  Title 

4150 

40 

Inspecting  of  Revenue  Equipment 

4151 

4o 

Cleaning  of  Revenue  Equipment 

4152 

40 

Service  Station  Labor 

4153 

40 

Storeroom  Labor  and  Expenses 

4i4o 

4o 

Maintenance  of  Bodies 

4i4i 

40 

Repairs  Due  to  Accidents 

4142 

40 

Repainting  Buses 

4i43 

4o 

Maintenance  of  Chassis 

4l44 

4o 

Maintenance  of  Brakes 

4145 

4o 

Maintenance  of  Engines 

4i46 

4o 

Maintenance  of  Clutch  and  Transmission 

4i47 

Maintenance  of  Motor  Coaches 

4o 

- Miscellaneous 

05 

- Military  Leave 

23 

- Holiday  Pay 

25 

- Sick  Pay 

26 

- Death-in-family  Leave 

27 

- Jury  Duty 

12 

- Vacation 

TABLE  7-3-5  (Continued) 


Account 

Number 

Sub-Account 

Number 

Account  Title 

1+11+8 

4o 

Repairs  Due  to  Vandalism 

4175 

Inspecting,  Cleaning,  and  Servicing 
of  Motor  Coaches 

ho 

- Miscellaneous 

05 

- Military  Leave 

23 

- Holiday  Pay 

25 

- Sick  Pay 

26 

- Death-in-family  Leave 

27 

- Jury  Duty 

12 

- Vacation 

4174 

Maintenance  and  Servicing  Bus 
Air  Conditioning  Equipment 

hO 

- Maintenance  and  Servicing 

05 

- Military  Leave 

23 

- Holiday  Pay 

25 

- Sick  Pay 

26 

- Death-in-family  Leave 

27 

- Jury  Duty 

12 

- Vacation 

4110 

1+0 

Supervision  of  Shop  and  Garage 

4121 

1+0 

Repairs  to  Shop  and  Garage  Equipment 

4122 

1+0 

Operation  and  Maintenance  of  Service 
Equipment 

4128 

1+0 

Repairs  to  Shop  and  Garage  Buildings 
and  Grounds 

TABLE  7*3-5  (Continued) 


Account 

Number 

Sub-Account 

Number 

Account  Title 

Ul32 

4o 

Other  Shop  and  Garage  Expense 

4l6l 

4o 

Maintenance  and  Servicing  Tires 

1+173 

4o 

Maintenance  and  Servicing  Air  Conditioning 
Equipment 

4211 

4o 

Supervision  of  Transportation  - General 

4213 

4o 

Line  Supervision 

4214 

4o 

Superintendence  - Oak  Cliff  Division 

4215 

4o 

Superintendence  - East  Dallas  Division 

4216 

4o 

Barn  Cashiers 

4218 

4o 

Chartered  Coach  Dept.  - Salaries  and 
Expenses 

4219 

4o 

Research  Dept.  - Salaries  and  Expenses 

4264 

4o 

Other  Transportation  Expenses 

4268 

4o 

Maintenance  - Transp.  Bldgs.  & Structures 

4510 

4o 

Safety  Department  Expense 

4530 

40 

Investigations  - Claim  Agents 

4532 

4o 

Miscellaneous  Claim  Agents  Expense 

4612 

4o 

Expenses  of  General  Officers 

4615 

4o 

Expenses  of  Employee  Services 

4630 

4o 

General  Office  Supplies  and  Expense 

4631 

4o 

General  Office  Building  - Maintenance 

4632 

4o 

General  Office  Building  - Operation 

4656 

4o 

Other  General  Expense 
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TABLE  7-3-5  (Concluded) 


Account 

Number 

Sub-Account 

Number  Account  Title 

0000 

40  (Provided  for  non-revenue  vehicles  not 

assigned  to  a specific  department) 

Bote:  Sub-Account  Number  ' Uo ’ is  a dummy  sub-account  added  to  the 

transaction  during  processing. 
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7 • 4 CLASSM  - Maintenance  Report  Extract 

The  Maintenance  Report  Extract  program  (CLASSM)  is  designed 
to  classify  labor  distribution  records  for  reporting  purposes.  Each 
record  includes  one  or  more  fields  that  identify  the  labor  trans- 
action. It  can  be  identified  by  variables  such  as  account  number, 
work  order  number,  vehicle  number,  group-unit  code,  type  of  work  code, 
and  reason  code.  The  identifying  variables  in  the  input  record  are 
compared  to  valid  combinations  of  these  variables.  Each  valid  com- 
bination forms  part  of  a line  entry  in  a table  stored  as  the  Main- 
tenance Report  Classification  File.  The  remainder  of  the  line  entry 
is  the  report  classification  in  which  the  transaction  is  to  be  in- 
cluded. The  report  classification  is  added  to  the  labor  distribution 
record  in  the  form  of  a prefix.  The  augmented  records  are  written  to 
a temporary  disk  file  to  be  used  by  the  report  generator  program. 

7.4.1  System  Interfaces 

Figure  7-4-1  is  a program  flowchart.  As  illustrated,  input  con- 
sists of: 

(a)  Report  Request  File,  CN1510.RPC.S.DATEFILE.  This  data  set 
is  created  through  execution  of  the  Vehicle  File  Extract 
program,  RE100. 

(b)  Maintenance  Report  Classification  File,  MCLASS.  This  data 
set  contains  the  report  classification  table.  It  is  created 
initially  (and  updated)  through  card  input,  which  is  copied 
to  disk  storage  through  the  execution  of  the  utility  program, 
IEBGENER. 

(c)  Labor  Transaction  History  File,  CN1510.RPC.M.TRANHIST(  ). 

This  file  is  a generation  date  set,  maintained  by  the  Labor 
Transaction  History  File  Edit/Update  program,  DG500. 
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FIGURE  7.4-1 

CLASSM  PROGRAM  FLOWCHART 
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Output  consists  of  a temporary  disk  file,  the  Labor  Hours  Extract 
File,  & LABOR,  and  of  an  edit  report.  List  of  Accounting  Classification 
Exceptions.  The  output  file  is  used  by  the  Maintenance  Report  Gener- 
ator program,  M1M200. 

l.b.2  Program  Files 

No  file,  other  than  print  files,  is  created  and  used  within  the 
program. 

7.^.3  Processing  Functions 

As  illustrated  in  Figure  7.^-1,  the  input  data  sets  are  read. 

The  records  in  the  Report  Request  File  provide  report  control  and 
specify  the  period  for  which  reports  are  to  be  generated. 

Based  on  the  report  date  specified,  labor  distribution  records  are 
extracted  from  the  Labor  Transaction  History  File.  The  organization 
code  in  each  selected  record  is  checked  against  values  specified  in 
the  program.  As  these  values  are  included  in  program  instructions, 
there  are  two  versions  of  the  program,  one  for  each  property  at  which 
the  system  has  been  implemented. 

For  each  record,  the  report  classification  table  is  searched. 

If  the  variables  that  identify  the  transaction  cannot  be  matched 
against  any  record  in  the  table  or  the  transaction  contains  a invalid 
organization  code,  the  transaction  is  rejected.  The  rejected  trans- 
action record  is  displayed  on  the  report,  List  of  Accounting  Classifi- 
cation Exceptions . 
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If  the  transaction  matches  a record  in  the  table,  the  output 
record  (see  Table  6.13-2)  is  created: 

(a)  a prefix,  containing  the  report  code  and  the  report  classifi- 
cation code  and  date  of  the  transaction,  is  created.  The 
report  code  is  obtained  from  the  input  date  record.  The 
report  classification  code  is  obtained  from  the  table.  It 
identifies  the  paragraph,  and  line  within  the  paragraph  of 
the  report  in  which  the  transaction  is  to  be  included. 

(b)  the  remainder  of  the  output  record  consists  of  the  fields 
contained  in  character  positions  29-96  of  the  Labor  Distri- 
bution Record  (see  Section  6.1).  Information  not  required 
by  the  report  generator  program  is  thus  eliminated. 

The  output  record  is  written  out  to  a temporary  disk  file  (&LABOR) 
for  processing  by  the  report  generator  program. 

'J.k.k  Error  Messages 

If  an  error  is  detected,  program  execution  is  terminated  and  an 
appropriate  error  message  printed.  A return  code  of  six  (6)  is  gen- 
erated which  causes  the  system  to  bypass  execution  of  the  report 
generator  program.  Other  programs  that  may  be  executed  subsequent  to 
these  programs  are  not  affected  by  this  return  code.  The  error 
conditions  and  their  associated  messages  are: 

(a)  If  no  report  request  record  is  found,  the  following  message 
is  printed: 

' CLASSM-0100  - NO  DATE  RECORD  FOUND'. 

(b)  If  the  report  classification  table  contains  more  than  500 
records,  the  following  message  is  printed: 

' CLASSM-0300  - NO  TRANSACTIONS  FOUND  FOR  REPORT  PERIOD'. 
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7.^.5  Remarks 

Organization  codes  are  program  values.  As  these  values  are  dif- 
ferent between  properties,  two  versions  of  the  program  are  available, 
one  for  each  of  the  two  properties  at  which  the  system  has  been  installed. 
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7 • 5 M1M200  - Maintenance  Report  Generator 


The  Maintenance  Report  Generator  program  (M1M200)  is  designed 
to  generate  two  monthly  maintenance  labor  reports.  These  are: 

(a)  Hourly  Maintenance  Labor  Utilization:  The  format  of  the 

report  is  shown  in  Figure  7-5-1.  The  report  displays  the 
distribution  of  maintenance  labor  hours  among  work  categories, 
for  each  maintenance  organizational  unit  and  in  total.  It 
also  displays  hours  incurred  for  non-work  categories,  such 

as  vacation,  holidays,  and  sick  time. 

(b)  Maintenance  Labor  Costs:  The  format  of  the  report  is  shown 
in  Figure  7-5-2.  The  hours  reported  on  the  Hourly  Main- 
tenance Labor  Utilization  report  are  displayed  in  terms  of 
cost.  Also,  total  costs  are  displayed  in  terms  of  cents 
per  mile. 

The  program  has  been  designed  in  a manner  that  permits  the 
generation  of  other  maintenance  reports,  as  yet  unspecified  with  only 
minor  modifications  to  the  current  version  of  the  program.  Also,  the 
program  is  designed  to  use  a separate  employee  file  if  employee  pay 
rates  are  not  included  in  the  input  file  or  the  report  control  file. 

7-5-1  System  Interfaces 

Figure  7-5-3  is  a program  flowchart.  As  illustrated,  input  consists 


of: 

(a)  Labor  Hours  Extract  File,  &LABOR.  This  data  set  is  a tem- 
porary disk  file  created  by  the  Maintenance  Report  Extract 
program,  CLASSM.  It  contains  the  labor  distribution  records 
for  the  report  period.  Each  record  has  been  identified  in 
terms  of  report  classification. 

(b)  Report  Request  File,  CN1510 . RPC . S .DATEFILE . This  data  set  is 
created  through  the  execution  of  the  Vehicle  File  Extract 
program,  RE100.  Each  record  within  the  file  contains  a 
report  code,  report  date,  and  the  total  system  miles  for  the 
report  month. 
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FIGURE  7.5-2 
FORMAT  OF 

MAINTENANCE  LABOR  COSTS  REPORT 
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FIGURE  7.5-3 

MIM200 PROGRAM  FLOWCHART 
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(c)  Maintenance  Report  Generator  Control  File,  MCNTRL.  This 
data  set  is  created  initially  (and  updated)  through  card 
input  which  is  copied  to  disk  storage  through  the  execution 
of  the  utility  program,  IEBGENER.  The  file  contains  constants 
records.  Each  record  contains  parameters  necessary  to  the 
generation  of  a report  and  is  specific  to  the  user  property. 
For  example,  it  contains  the  overtime  factor — that  is,  the 
relationship  "between  the  straight-time  pay  rate  and  the  over- 
time pay  rate.  The  file  is  defined  in  Section  6.8. 

Output  consists  of  the  reports,  referenced  above. 

7*5.2  Program  Files 

No  file,  other  than  print  files,  are  created  and  used  within  the 
program. 

7.5.3  Processing  Functions 

As  illustrated  in  Figure  7-5-3,  the  Report  Request  File  and  the 
Maintenance  Report  Generator  Control  File  are  read.  The  report  date 
and  total  system  miles  for  the  report  period  are  obtained  from  the 
former.  The  constants  record  applicable  to  the  user  is  selected  from 
the  control  file  and  placed  in  working  storage  for  use  during  the 
program.  This  record  contains  parameters  used  to  control  the  accumu- 
lation and  calculation  of  labor  hours  and  costs,  and  organization 
codes  used  to  classify  the  data  in  terms  of  report  columns. 

The  labor  distribution  records  are  read  in.  Each  record  contains 
a code  indicating  the  report  line  classification  in  which  transaction 
data  is  to  be  included. 

Using  the  labor  hours  data  in  the  input  record  and  the  hourly 
pay  rate,  the  cost  of  the  maintenance  labor  transaction  is  calculated. 
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The  hourly  rate  is  obtained  from  one  of  the  following  sources: 

(a)  the  input  transaction  itself.  As  the  system  is  currently 
implemented,  this  .is  the  data  source. 

(b)  the  constants  record.  This  is  the  source  if  a single 
average  hourly  rate  is  applied. 

(c)  an  employee  table.  The  creation  of  an  employee  table, 
specifying  individual  pay  rates  is  an  alternative  to  the 
inclusion  of  the  rate  in  the  input  record.  This  alternative 
has  not  been  implemented. 

For  each  cost  calculation,  a single  algorithm  is  used.  This 
single  algorithm  contains  two  parts.  Only  one  part  is  applied  in  any 
one  calculation.  The  choice  of  the  part  used  depends  on  the  nature 
of  the  hours  data  entered  and  the  values  in  the  constants  record. 

For  example,  at  one  property  overtime  hours  entered  represent 
actual  hours  worked.  At  another,  overtime  hours  are  entered  in  terms 
of  straight-time  pay  hours.  The  user  sets  the  overtime  applicability 
factor  in  the  constants  record  to  indicate  how  the  overtime  cost 
algorithm  is  to  be  applied. 

After  calculations  are  completed,  hourly  and  cost  data  are  ac- 
cumulated by  report  classifications.  For  this  purpose,  the  report 
classification  is  defined  by  the  line  and  the  column  of  the  report. 
When  data  aggregation  is  complete,  the  reports  are  generated. 

7-5.U  Error  Messages 

If  the  report  request  record  is  not  found  or  is  invalid,  program 
execution  is  terminated  and  the  following  message  is  printed: 

' M1M200-0300  - NO  DATE  RECORD  FOUND'. 
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7.5*5  Remarks 


Two  versions  of  the  program  are  available,  one  for  each  of  the 
two  transit  properties  at  which  the  system  has  been  installed.  Two 
versions  were  necessitated  by  differences  in  the  report  formats  and 
the  organization  codes  for  the  two  properties. 
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7 • 6 RE100  - Vehicle  File  Extract  Program 

The  Vehicle  File  Extract  program,  RE100,  creates  two  control  files 
that  contain  information  necessary  to  the  execution  of  Repair  Cost 
System  report  generators . The  program  reads  a set  of  user-supplied 
report  request  cards,  and  the  SIMS  S/U  System  Vehicle  Master  File, 
CN1510 . SRV.M. VEHICLE( 0 ) . Two  control  files  are  created  on  the  basis 
of  these  data  sources.  These  files  are: 

(a)  the  Vehicle  Extract  File.  This  file  contains  a record 

for  each  vehicle  on  the  Vehicle  Master  File.  The  Bus  Repair 
Cost  Report  Generator  program  requires  this  file. 

(b)  the  Report  Request  File.  This  file  contains  report  request 
records  necessary  to  the  execution  of  the  Labor  Report 
Generator  program. 

7*6.1  System  Interfaces 

Figure  7.6-1  is  a program  flowchart.  Program  input  consists  of 
the  following  data  sets: 

(a)  the  Vehicle  Master  File,  CN1510.SRV.M.VEHICLE(0).  This  is 
the  basic  file  of  the  SIMS  S/U  System.  Its  contents  include 
records  of  vehicle  servicing  and  maintenance  performed  for 
each  vehicle  in  the  system. 

(b)  the  Date  Card  File,  DATECD.  This  is  a file  of  80-character 
card  records.  The  records  contain  request  information  for 
the  Repair  Cost  System  report  generators. 

Program  output  consists  of  the  Vehicle  Extract  File,  &BUSLST,  and 
the  Report  Request  File,  CN1510.RPC.S.DATEFILE.  The  Vehicle  Extract 
File  contains  one  data  record  per  vehicle.  Each  record  contains  infor- 
mation necessary  to  the  execution  of  the  Bus  Repair  Cost  Report  Gen- 
erator program,  RP080.  The  Report  Request  File  contains  report  request 
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records  that  specify  the  reports  to  he  produced  by  the  Maintenance 
Report  Generator  program,  MIM200. 

7-6.2  Program  Files 

No  internal  file  is  created  during  program  execution. 

7-6.3  Processing  Functions 

As  illustrated  in  Figure  7-6-1,  the  program  reads  the  Date  Card 
File  (see  Section  6.11).  The  file  records  specify  the  reports  to  be 
executed  during  the  system  run.  Two  possible  report  codes  may  be 
included.  Table  7-6-1  lists  these  codes  and  their  corresponding 
programs . 

Each  date  card  is  edited  against  a set  of  criteria.  These 
criteria  are: 

(a)  the  report  code  must  be  valid — i.e.,  equal  to  R1  or  R2. 

(b)  the  date  must  be  valid  as  follows: 

(1)  numeric, 

(2)  the  year  must  be  not  less  than  72, 

(3)  the  month  must  be  between  1 and  12,  and 

(4)  the  day  must  be  between  1 and  31. 

(c)  for  report  code  Rl,  the  period  ending  date  must  be  greater 

than  the  period  beginning  date. 

If  any  of  the  request  cards  fail  these  edit  criteria,  program 
execution  terminates  with  the  printing  of  an  indicative  message. 
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TABLE  7.6-1 


REPAIR  COST  SYSTEM  REPORT  CODES 


REPORT  CODE  PROGRAM  EXECUTED  REPORT  PRODUCED 


R1 


RP080 


R2 


Ml  M2  00 
M1M200D 


Bus  repair  cost  by  sub- 
assembly 

Bus  repair  cost  by  sub- 
assembly  - labor  only 

Bus  repair  cost  by  sub- 
assembly  - parts  only 

Hourly  Maintenance 
Labor  Utilization 

Maintenance  Labor 
Cost 
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The  report  codes  are  grouped  into  two  categories.  The  code  R1 
causes  the  creation  of  the  Vehicle  Extract  File  (see  Section  6.l6). 

The  code  R2  initiates  the  creation  of  the  Report  Request  File  (see 
Section  6.10). 

The  program  reads  the  Vehicle  Master  File.  If  report  code  R1  is 
specified,  an  extract  record  is  created  for  each  vehicle.  The  extract 
record  consists  of  the  following  data  elements: 

(a)  vehicle  number, 

(b)  divi  si on  number, 

(c)  fleet  number,  and 

(d)  the  mileage  traveled  by  the  vehicle  during  the  report  period. 
These  extract  records  are  output  to  the  Vehicle  Extract  File,  &BUSLST. 
If  an  R1  request  is  not  made,  the  Vehicle  Extract  File  is  a null  file. 

During  the  extracting  procedures,  a record  is  kept  of  the  accu- 
mulated miles  traveled  by  month  and  by  the  vehicles  in  the  system. 

These  mileages  are  used  to  create  Report  Request  File  records  should 
the  user  enter  the  appropriate  request  code. 

When  all  vehicles  have  been  processed,  a check  is  made  whether  the 
user  has  submitted  an  R2  request  code.  If  not,  the  program  is  termi- 
nated, and  the  Report  Request  File  is  a null  file. 

If  a request  code  R2  is  input,  the  program  creates  the  Report 
Request  File,  CN1510 . RPC . S . DATEFILE . This  file  contains  (at  most)  two 
records,  one  of  each  of  the  possible  codes.  Each  record  consists  of: 

(a)  the  report  code, 

(b)  the  date  for  the  month  of  the  report,  and 
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(c)  the  accumulated  miles  traveled,  by  all  vehicles  in  the  system, 
for  the  report  month. 

7.6.4  Error  Messages 

During  program  execution,  an  error  may  occur  that  is  critical 
enough  to  cause  termination  of  the  program.  The  error  also  causes 
the  bypassing  of  succeeding  steps  in  the  system.  This  is  accomplished 
by  passing  a program  return  code  of  eight  (8). 

An  indicative  message  is  printed  specifying  the  error.  The 
possible  errors  are: 

(a)  ' RE100  - INVALID  DATE  REQUEST  FOUND' 

A coding  error  was  detected  in  the  user-supplied  Date  Card 
File. 

(b)  ' RE100  - NO  DATE  REQUEST  CARDS  FOUND' 

No  records  were  found  in  the  user-supplied  Date  Card  File. 


7-  7 RE200  - Materials  Cost  File  Extract 


The  Materials  Cost  File  Extract  program  (RE200)  is  designed  to 
develop  the  cost  of  materials  issued  for  the  repair  of  revenue  vehicles 
during  a reporting  period.  Calculated  costs  are  aggregated  for  each 
revenue  vehicle,  by  subassembly  (vehicle  group).  Parts  cost  records 
are  written  out  to  a temporary  disk  file  for  use  -by  the  Bus  Repair 
Cost  Report  Generator  program,  RP080 

7.7-1  System  Interfaces 

Figure  7.7-1  is  a program  flowchart.  As  illustrated,  program 
input  consists  of: 

(a)  Vehicle  Extract  File,  &BUSLST , created  through  the  execution 
of  the  Vehicle  File  Extract  program,  RE100. 

(b  ) Inventory  Transaction  History  File,  CU17^. INV.M.TRANTAPE( 0) , 
maintained  by  the  SIMS  Inventory  System. 

Output  consists  of  the  Materials  Cost  Extract  File,  &PTC0ST,  which 
is  a temporary  disk  file. 

7.7*2  Program  Files 

No  files,  other  than  sort  files,  are  created  during  program 
execution. 

7.7.3  Processing  Functions 

As  illustrated  in  Figure  7-7-1,  the  input  data  sets  are  read. 

The  first  record  on  the  Vehicle  Extract  File  (see  Section  6.l6)  is  the 
Renort  Period  Specification  Record.  The  dates  contained  in  this  record 
control  selection  of  records  from  the  Inventory  Transaction  History 
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FIGURE  7.7-1 

RE200  PROGRAM  FLOWCHART 
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File  (see  Section  6.2)  for  further  processing.  This  includes: 

(a)  Selection  of  Materials  Issue  records  (transaction  codes  lU 
and  26)  containing  a transaction  date  within  the  report 
period  specified. 

(h ) If  the  transaction  is  identified,  hy  account  number  or  work 
order  number,  as  a charge  for  repairs  due  to  an  accident  or 
to  vandalism,  then  the  inventory  class  code  is  replaced. 

For  accident  repairs,  the  code  is  '95';  for  vandalism  re- 
pairs, the  code  is  ’96'. 

(c)  If  the  inventory  class  code  in  the  selected  record  is  other 
than  specified  class  code,  the  class  code  is  replaced  with 
a value  of  '91'.  This  identifies  miscellaneous  materials. 

The  specified  class  codes  identify  vehicle  subassemblies 
(groups) . 

(d)  Using  the  average  unit  price  and  the  quantity  issued  contained 
in  the  record,  transaction  cost  is  calculated.  If  the  trans- 
action code  is  '1^',  the  product  is  multiplied  by  '-1',  as 
this  type  of  transaction  is  a credit  issue. 

(e)  A sort  record  is  created.  This  record  has  the  same  format 
as  the  record  written  out  to  the  Materials  Cost  Extract 
File  (see  Section  6.15)- 

(f)  The  records  are  sorted  using  the  first  8 characters  as  the 
sort  key.  This  contains: 

(1)  Format  code  (=l) , 

(2)  Vehicle  number, 

(3)  Inventory  class  code,  and 

(U)  Parts  cost  record  identifier  (=l). 

(g)  Cost  values  are  aggregated  for  each  vehicle  group  (class  code) 
for  each  vehicle. 

(h)  Records  containing  the  aggregated  cost  values  are  written 
out  to  the  Materials  Cost  Extract  File  (OSORT-FILE) . 

When  all  Materials  Issue  records  have  been  processed,  the  program 

terminates . 
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7. 7-  *+  Error  Messages 

If  the  report  request  code  in  the  Report  Period  Specific 
Record  is  other  than  '2',  an  error  message  is  printed  and  the 
step  is  terminated.  The  error  message  is: 


at  ion 
job 


RE200A  - THE  REQUEST  CODE  IS  NOT  2'. 


7 • 8 KE300  - Labor  Cost  File  Extract 


The  Labor  Cost  File  Extract  program  (RE300)  is  designed  to  develop 
the  cost  of  maintenance  labor  for  the  repair  of  revenue  vehicles  during 
a reporting  period.  Calculated  costs  are  aggregated  for  each  revenue 
vehicle,  by  subassembly  (vehicle  group).  Labor  cost  records  are 
written  out  to  a temporary  disk  file  for  use  by  the  Bus  Repair  Cost 
Request  Generator  program,  RP080. 

7.8.1  System  Interfaces 

Figure  7*8-1  is  a program  flowchart.  As  illustrated,  program 
input  consists  of: 

(a)  Vehicle  Extract  File,  &BUSLST,  created  through  the  execution 
of  the  Vehicle  File  Extract  program,  RE100. 

(b)  Labor  Transaction  History  File,  CN151O.RPC.M.TRANHIST(0) , 
maintained  by  the  Labor  Transaction  History  File  Edit/Update 
program,  DG500. 

Output  consists  of  the  Labor  Cost  Extract  File,  &LBCOST,  which 
is  a temporary  disk  file . 

7.8.2  Program  Files 

No  files,  other  than  sort  files,  are  created  during  program 
execution. 

7.8.3  Processing  Functions 

As  illustrated  in  Figure  7-8-1,  the  input  data  sets  are  read. 

The  first  record  on  the  Vehicle  Extract  File  (see  Section  6.l6)  is  the 
Report  Period  Specification  Record.  The  dates  contained  in  this  record 
control  selection  of  records  from  the  Labor  Transaction  History  File 
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(sec-  Section  6.1)  for  further  processing.  This  includes: 

(a)  Selection  of  Labor  Distribution  records  containing  a trans- 
action date  within- the  report  period  specified. 

(b)  If  a transaction  is  identified,  by  account  number  or  work 
order  number,  as  a charge  for  repairs  due  to  an  accident  or 
to  vandalism,  then  the  group  code  is  replaced.  For  accident 
repairs,  the  code  is  '95';  for  vandalism  repairs,  the  code 
is  ' 96 ' . 

(c)  If  the  group  code  in  the  selected  record  is  other  than 
specified  group  codes , the  group  code  is  replaced  with  a 
value  of  '91* • This  identifies  miscellaneous  vehicle 
maintenance  work. 

(d)  Using  the  hourly  pay  rate  and  hours  worked  contained  in  the 
labor  distribution  record,  transaction  cost  is  calculated. 

If  the  record  contains  both  regular  hours  and  premium  hours 
values,  the  hours  are  summed  before  the  cost  is  calculated. 

(e)  A sort  record  is  created.  This  record  has  the  same  format 
as  the  record  written  out  to  the  Labor  Cost  Extract  File 
(see  Section  6.l4). 

(f)  The  records  are  sorted  using  the  first  8 characters  as  the 
sort  key.  This  contains: 

(1)  Format  code  (=l), 

(2)  Vehicle  number, 

(3)  Group  code,  and 

(4)  Labor  cost  record  identification  (=2). 

(g)  Cost  values  are  aggregated  for  each  vehicle  group  for  each 
vehicle. 

(h)  Records  containing  the  aggregated  values  are  written  out  to 
the  Labor  Cost  Extract  File  (OSORT-FILE) . 

When  all  Labor  Distribution  records  have  been  processed,  the 

program  terminates . 
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7-8.1+  Error  Messages 
If  the  report  request 
Record  is  other  than  '3', 


code  in  the  Report  Period  Specification 
an  error  message  is  printed  and  the  job 


step 


is  terminated. 


The  error  message  is: 


' RE300A  - THE  REQUEST  CODE  IS  HOT  3'. 
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7 • 9 RP080  - Bus  Repair  Cost  Report  Generator 


The  Bus  Repair  Cost  Report  Generator  was  designed,  to  produce  on- 
demand  reports.  The  program  is  normally  executed  on  a monthly  basis. 

The  program  produces  two  reports,  the  Bus  repair  Cost  By  Sub- 
assembly  and  the  Subassembly  Repair  Cost  - Division  Summary.  These 
reports  are  designed  to  assist  maintenance  management  in  monitoring 
vehicle  repair  cost  by  subassembly  classification.  Report  options 
include  production  of  the  report  on  the  basis  of  parts  and  labor  cost, 
parts  cost  only,  and  labor  cost  only. 

The  report  options  are  enacted  by  execution  of  a cataloged  pro- 
cedure. Each  of  the  three  options  has  a unique  procedure  associated 
with  it.  See  Section  5*0  for  a description  of  the  SIMS  Repair  Cost 
procedures. 

7.9*1  System  Interface 

Figure  7-9-1  is  a program  flowchart.  Program  input  consists  of 
three  data  sets. 

(a)  the  Vehicle  Extract  File,  &BUSLST  (see  Section  6.15).  This 
file  is  created  by  execution  of  RE100,  the  Vehicle  Extract 
program.  It  contains  one  record  for  each  vehicle  in  the 
SIMS  S/U  System. 

(b)  the  Labor  Cost  Extract  File,  &LBC0ST  (see  Section  6.13). 

This  file  is  created  by  execution  of  RE300,  the  Labor  Cost 
Extract  program.  It  contains  records  of  the  labor  cost  of 
vehicle  repair  by  repair  classification. 

(c)  the  Parts  Cost  Extract  File,  &PTC0ST  (see  Section  6.l4). 

This  file  is  created  by  execution  of  RE200,  the  Parts  Cost 
Extract  program.  It  contais  records  of  the  cost  of  parts 
used  in  vehicle  repair  by  repair  classification. 
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FIGURE  7.9-1 

RP080  PROGRAM  FLOWCHART 
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Program  output  consists  of  two  reports,  the  Bus  Repair  Cost  By 
Subassembly  and  the  Subassembly  Repair  Cost  - Division  Summary. 

Figures  7-9-2  and  7-9-3  give  report  formats  for  these  reports. 

No  file  is  created  that  is  read  by  other  programs  in  the  system. 

7-9-2  Program  Files 

One  internal  file  is  created  during  program  execution.  This  file 
is  the  Report  File,  OSORT-FILE,  and  is  created  using  the  COBOL  internal 
sort  routine.  For  each  vehicle  in  the  system,  one  record  is  created 
containing  the  total  cost  of  vehicle  maintenance,  by  repair  classifi- 
cation, for  the  report  period.  This  file  is  used  to  generate  the  pro- 
gram reports. 

Table  7-9-1  and  7-9-2  give  file  and  record  specifications  for 
this  file. 

7-9-3  Processing  Functions 

As  illustrated  in  Figure  7-9-1,  the  program  reads  the  Vehicle 
Extract  File.  This  file  contains  one  record  per  vehicle  in  the  system. 
One  record  is  read  at  a time,  and  the  vehicle  number  becomes  the  key 
for  the  reading  of  the  two  cost  extract  files.  The  program  builds 
one  report  record  per  vehicle.  This  record  is  released  to  the  COBOL 
internal  sort  routine  upon  completion  of  processing  of  all  data  for 
that  vehicle.  The  record  contains  dollar  costs  of  repairs  for  the 
following  repair  classifications: 

(a)  Inspections, 

(b)  Front  Axle, 
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FIGURE  7.9  2 
FORMAT  OF 
BUS  REPAIR  COST 
BY  SUBASSEMBLY  REPORT 
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FIGURE  7.9  3 
FORMAT  OF 

SUBASSEMBLY  REPAIR  COST 
DIVISION  SUMMARY 


TABLE  7.9-1 


PROGRAM  FILE  SPECIFICATION 


FILE  NAME:  OSORT-FILE 


DATA  SET  NAME:  &REPORT 

NUMBER  OF  RECORD  FORMATS:  1 

RECORD  SIZE:  97  Characters 

FILE  ORGANIZATION:  Sequenced  By: 

Division 

Vehicle  Number 

RECORD  FORMATS 

RECORD  NAME 

MAX.  NO.  MIN.  NO. 

Report  Record 

U 1 
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TABLE  7-9-2 


RECORD  SPECIFICATION 

RECORD  NAME:  Report  Record 

FILE  NAME:  OSORT-FILE 

COBOL  NAME  OF  RECORD:  OSORT-REC 

RECORD  LENGTH:  97  Characters 


FIELD  FIELD 


POS. 

LENG. 

FORMAT 

COBOL  FIELD  NAME 

FIELD  DESCRIPTION 

1 

2 

99 

WS-DIV-NO 

Division  Number 

3 

k 

9(b) 

W5-BUS-N0 

Vehicle  Number 

7 

5 

S9(5) 

WS-INSP-COST 

Cost  of  Inspections  Done 

12 

5 

S9(5) 

WS-FT-AXLE-COST 

Cost  of  Front  Axle  Work 

17 

5 

S9(5) 

WS-RR-AXLE-COST 

Cost  of  Rear  Axle  Work 

22 

5 

S9(5) 

WS- BRAKES -COST 

Cost  of  Brake  Work 

27 

5 

S9(5) 

WS- CLUTCH- COST 

Cost  of  Clutch  Work 

32 

5 

S9(5) 

WS-COOL-SYS-CST 

Cost  of  Cooling  System 

Work 

37 

5 

S9(5) 

WS-ELEC-COST 

Cost  of  Electrical  System 

Work 

b2 

5 

S9(5) 

WS-ENG-COST 

Cost  of  Engine  Work 

>+7 

5 

S9(5) 

WS-TRANS-COST 

Cost  of  Transmission 

Work 

52 

5 

S9(5) 

WS-WHEELS-COST 

Cost  of  Wheel  Work 

57 

5 

S9(5) 

WS-BODY-COST 

Cost  of  Body  Repair  Work 

62 

5 

S9(5) 

WS-AIR-COND-COST 

Cost  of  Air  Conditioning 

System  Work 

67 

5 

S9(5) 

WS-MISC-COST 

Cost  of  All  Other  Repair 

Work 

72 

5 

S9(5) 

WS-TOTAL-COST 

Total  Cost  of  Work  Done 

77 

6 

S9(i4)V99 

WS-CENTS-PER-MIL 

Cost  Per  Mile  of  Total 

Work  Cost 

83 

5 

S9(5) 

WS-MILE-PER-PRD 

Miles  Traveled  for  Report 

Period 

88 

5 

S9(5) 

WS-ACC-COST 

Cost  of  Accident  Repair 

Work 

93 

5 

S9(5) 

WS -VAN- COST 

Cost  of  Vandalism  Repair 

TOTAL 

97 
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(c ) Rear  Axle , 

(d)  Brakes, 

(e)  Clutch, 

(f)  Cooling  System, 

(g)  Electrical  System, 

(h)  Engine, 

(i)  Transmission, 

( j ) Wheels , 

(k)  Body  Work, 

^ - 

(l)  Air  Conditioning 

(m)  Accidents, 

(n)  Vandalism,  and 

(o)  Miscellaneous. 

The  cost  data  may  come  from  two  sources,  the  Labor  Cost  Extract 
File  and  the  Parts  Cost  Extract  File.  Each  file  is  sequenced  by 
vehicle  number.  The  file  contents  are  matched  against  the  vehicle 
number  being  considered  from  the  Vehicle  Extract  File.  When  a match 
occurs,  the  cost  data  is  entered  into  the  proper  classification 
category  in  the  report  record.  The  program  can  read  both  of  the 
sources,  or  the  parts  cost  only,  or  the  laber  cost  only.  This  option 
depends  on  the  report  which  the  user  has  requested. 

When  all  cost  data  has  been  read  for  the  vehicle  currently  con- 
sidered, the  report  record  is  released  to  the  COBOL  internal  sort. 

The  sorting  is  done  on  division  number  and  vehicle  number.  When  all 
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cost  data  has  been  processed  for  all  system  vehicles,  control  is  trans- 
ferred to  the  report  section  of  the  program. 

The  Report  File  is  read  and  one  report  line  is  generated  per 
vehicle  record.  Control  of  page  spacing  is  on  change  of  division 
number.  Within  division,  vehicles  numbers  are  displayed  in  ascending 
order.  Totals  are  saved  of  the  repair  cost  data.  These  are  used  to 
produce  the  division  summary  report.  This  report  is  generated  when 
all  vehicle  records  have  been  processed. 

Program  termination  occurs  with  the  production  of  the  division 
summary  report. 

7. 9. b Error  Messages 

The  first  record  of  the  Vehicle  Extract  File  is  a header  record 
giving  the  report  period  dates.  If  this  record  is  not  present,  an 
error  occurs.  The  program  prints  a message  and  execution  terminates. 
The  message  is: 

'ERROR  IN  THE  DATE-FILE'. 
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7.10  DTS  Employee  File  Extract  (EMP100) 


The  DTS  Employee  File  Extract  program  (EMP100)  is  designed  to 
produce  a file  of  transit  maintenance  employee  data.  The  program  reads 
and  edits  a deck  of  employee  data  cards , and  produces  extract  records 
for  employees  working  on  vehicle  maintenance.  Each  extract  record 
contains  an  employee  number,  organization  code,  and  a pay  rate.  A 
report  of  employee  card  edit  errors  is  produced,  as  well  as  a summary 
report  of  employee  cards  read  by  department.  The  Employee  Master  File 
created  by  the  program  is  used  by  the  DTS  Data  Acceptance  program,  DA500D, 
in  conversion  of  DTS  labor  transactions  to  a format  acceptable  to  the 
R/C  System. 

7.10.1  System  Interfaces 

Figure  7-10-1  is  a program  flowchart.  The  program  reads  the  DTS 
Employee  Card  File.  This  is  a file  of  80-character  records  read  through 
the  job  stream  on  punched  cards.  One  record  exists  for  each  transit 
company  employee . 

Program  output  consists  of  two  reports  and  the  Employee  Master 
File  (CN1510.RPC.S.EMPFILE) . The  reports  produced  are: 

(a)  The  Employee  Card  Edit  List,  which  displays  employee  cards 
rejected  during  editing. 

(b)  The  Employee  Statistics  Report,  which  presents  a count  (by 
department)  of  the  employee  cards  read. 

The  Employee  Master  File  is  a disk  file.  It  is  used  as  input  to 
the  DTS  Data  Acceptance  program,  DG500D.  The  contents  include  data 
for  employees  working  in  vehicle  maintenance. 
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FIGURE  7.10-1 

EMP100 PROGRAM  FLOWCHART 
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7.10.2  Program  Files 

Wo  internal  file  is  created  during  program  execution. 

7.10.3  Processing  Functions 

As  illustrated  in  Figure  7-10-1,  the  DTS  Employee  File  Extract 
program  reads  a file  of  employee  data  cards.  For  each  record,  a 
set  of  edit  functions  is  performed.  Employee  cards  that  are  not 
applicable  to  vehicle  maintenance  are  bypassed.  A count  is  kept  of 
the  number  of  these  read. 

Those  transactions  that  are  applicable  are  edited  against  a set 
of  edit  criteria.  These  criteria  are  listed  in  Table  7-10-1. 

Erroneous  records  are  displayed  on  the  Employee  Card  Edit  List  with  an 
asterisk  under  the  field  in  error. 

Valid  records  are  used  to  create  extract  records  output  to  the 
Employee  Master  File.  These  extract  records  consist  of  employee  num- 
ber, organization  code,  and  pay  rate. 

When  all  employee  cards  have  been  processed,  the  Employee  Statis- 
tics report  is  produced.  This  report  contains  a count  of  the  number 
of  employee  cards  read.  The  count  is  broken  up  into  the  number  of 
valid  and  invalid  records  by  account  classification.  The  classifi- 
cation includes  account  numbers  08j2  and  0873,  non-transit,  and  other 
department  codes . 

Program  termination  occurs  with  the  completion  of  the  Employee 
Statistics  report. 
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TABLE  7.10-1 


TRANSACTION 


Employee  Card 


EMP100  EDIT  CRITERIA 


EDIT  FUNCTION 


Cards  that  meet  the  following  tests 
are  edited.  Those  that  fail  are 
"bypassed,  and  an  appropriate  counter 
incremented. 


(a) 

Transit  Code  must  equal  'T' , 

(b) 

Payroll  Code  must  equal  ' 6'  , 
and 

(c) 

Department  Code  must  be  0872 
or  0873. 

Those 

above 

transactions  that  meet  the 
criteria  are  edited  as  follows 

(a) 

employee  number  must  be  nu- 
meric and  non-zero. 

(b) 

pay  rate  must  be  numeric  and 
non-zero , 

(c) 

account  code  must  be  '7', 

(d) 

If  department  code  equals 
0872,  the  function  code  must 
be : BE , BS , or  BF , and 

(e) 

If  department  code  equals 
0873,  the  function  code  must 
be  BE. 
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7.10.4  Error  Messages 

If  no  employee  cards  are  submitted  by  the  user,  an  error  occurs. 
A message  is  printed  and  a program  code  of  eight  (8)  is  returned  to 
the  system.  This  code  causes  the  remainder  of  the  job  steps  to  be 
bypassed.  The  message  printed  is: 

' EMP100-O3OO  - NO  EMPLOYEE  CARDS  FOUND'. 
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8.0  SIMS  REPAIR  COST  SYSTEM  INSTALLATION 


Installation  of  the  SIMS  Repair  Cost  System  involves: 

(a)  initialization  of  system  files  and  program  libraries. 

(b)  entry  of  transaction  data  and  generation  of  reports 
to  test  the  system. 

The  initial  steps  to  install  the  system  are  undertaken  by  per- 
sonnel of  the  computer  facility  at  which  the  system  is  to  be  implemented. 
The  steps  undertaken  are: 

(a)  The  program  load  library  is  stored  on  the  disk  pack,  TMDISK, 
on  which  the  Service/Unit  Change  System  is  resident. 

(b)  A generation  data  set  index  is  created,  using  an  IBM  utility 
program,  IEHPROGM. 

(c)  The  allocation  of  space  required  by  data  sets  is  made. 

(d)  The  Repair  Cost  cataloged  procedures  are  entered  in  the 
system  procedures  library. 

(e)  The  two  constants  files  are  initiated  using  an  IBM  utility 
program,  IEBGENER. 

The  initiating  and  updating  of  the  constants  files  consist  of 
using  IEBGENER  to  copy  the  records  to  disk.  The  data  must  be  coded 
in  the  same  format  as  the  constants  files  records.  These  formats  are 
detailed  in  Sections  6.8  and  6.9. 

After  the  two  constants  files  have  been  initiated,  maintenance 
labor  distribution  records  are  processed  for  the  purposes  of: 

(a)  testing  the  system,  and 

(b)  initiating  the  Labor  Transaction  History  File. 

If  the  labor  distribution  record  does  not  contain  the  employee's 
hourly  pay  rate  and  organization  code,  then  a second  set  of  records. 
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employee  master  records  (see  Section  4.1),  are  also  entered.  The 
all-inclusive  monthly  job  (see  Section  4.3)  is  executed,  as  this  in- 
cludes the  generation  of  reports. 

For  the  initial  run,  the  JCL  deck  must  include  an  override  card 
for  one  data  set.  Normally,  the  most  recent  generation  of  the  Labor 
Transaction  History  File  is  used  as  input  to  the  job.  At  this  stage 
of  system  start-up,  this  file  does  not  exist  and  a dummy  data  set 
must  be  substituted.  This  is  accomplished  through  the  inclusion  of 
the  override  card  in  the  JCL  deck. 

The  output  from  the  initial  run  includes  both  edit  reports  and 
user  reports.  These  reports  should  be  analyzed  to  ensure  that  cor- 
rect data  was  entered  and  that  the  system  is  operating  satisfactorily. 
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